VBA理论练习题 - 图文(4)

VBA理 论 练 习 题 第 16 页 共 42 页

输入与窗体数据输出方式并限制窗体所显示的记录。

Docmd.openview可以使用openview操作在“数据表”视图、视图“设计”视图或打印预览中打开视图。当在“数据表”视图中打开视图时，该操作运行此命名的视图。可以选择该视图的数据项，并可限制视图显示的记录数。

Docmd.openrepot使用OpenReport操作，可以在“设计”视图或“打印预览”中打开报表或立即打印报表，也可以限制需要在报表中打印的记录。

Docmd.opentable使用OPentable操作，可以在“数据表”视图、“设计”视图或打印预览中打开表，也可以选择表的数据输入方式。

8．Access的控件对象可以设置某个属性来控制对象是否可用(不可用时显示为灰色状态)，需要设置的属性是一。(2006年4月)

A)Default B)Cancel C)Enabled D)Visible

解析：Default为命令按钮确定属性，只有命令按钮支持此属性。 Cancel为取消功能属性。 Enabled决定控件是否允许操作。 Visible决定控件是否可见。

9．如果加载一个窗体，先被触发的事件是。(2006年4月)

A)Load事件 B)Open事件 C)Click事件 D)Dalick事件

解析：Access加载窗体是运行指定的宏或用户定义的事件过程，然后显示窗体的记录。可以使用Load事件过程设置窗体或控件中的值，也可以设置窗体或控件的属性。Load事件发生在Open事件后及Resize事件前，不能被取消。Click事件发生在窗体单击时，没有Ddelick事件。

10．以下程序段运行结束后，变量x的值为_____。(2006年4月) x=2 y=4 DO

x=x*y y=y+1

Loop While y<4

A) 2 B) 4 C) 8 D) 20

解析：定义两个变量x=2、y=4，执行Do后的循环体语句：x=x*y=2*4=8；y=y+1=4+l=5；此时y：5，while语句为假退出循环。由于执行了一次循环，所以

VBA理 论 练 习 题 第 17 页 共 42 页

x=8。

11．在窗体上添加一个命令按钮(名为Commandl)，然后编写如下事件过程：(2006年4月)

Private Sub Commandl_Click( ) For i=1 To 4 x=4

Forj=1 To 3 x=3

For k=1 T0 2 x=x+6 Next k Nextj Next i MsgBox x End Sub

打开窗体后，单击命令按钮，消息框的输出结果是。 A)7 B)15 C)157 D)538

解析：此题中应用三重嵌套循环，循环嵌套的执行，当外层循环执行一次，内层就要执行所有的循环：

第一个for语句对变量x赋值，x=4； 第二个for语句对变量x赋值，x=3；

第三个for语句对变最x赋值，x=x+6。当i=1时，j=1，k执行其内部的两次循环，此时x赋值为3，当k=1时，x=x+6=3+6=9：k=2时，x=x+6=96=15。退出内循环到第二个for语句执行其剩余的循环，i=1、j=2时，k依旧执行其内部的两次循环，此后x还是等于15。i=1、j=3时，因为第三个for语句始终对x的赋值为15，所以运算结果x始终等于15。第二层循环完成后退回到第一层，执行其剩余的循环，步骤同上，因此x=15。

12．假定有如下的Sub过程：(2006年4月)

Sub sfun(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub

在窗体上添加一个命令按钮(名为Commandl)，然后编写如下事件过程：

VBA理 论 练 习 题 第 18 页 共 42 页

Private Sub Commandl_Click() Dim a as single Dim b as single a=5 b=4

sfun a，b

MsgBox a & chr(10)+chr(13) & b End Sub

打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为 。 A)1和1 B)1.25和1 C)1．25和4 D)5和4

解析：此题中设置了一个sfun()函数，进行除法运算和求模运算，为命令按钮(名为Commandl)编写事件，定义两变量a=5、b=4；调用此函数传递a、b的值给x、Y进行运算，t=x=5、y=4；x：t／y;x=5/4=1.25(除法运算)；Y=t Mod y=5 mod 4=1(求模运算)。

13．Sub过程与Function过程最根本的区别是。(2006年9月)

A)Sub过程的过程名不能返回值，而Function过程能通过过程名返回值 B)Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以 C)两种过程参数的传递方式不同

D)Function过程可以有参数，Sub过程不可以

解析：过程是模块的单元组成，分为两种类型：Sub过程和Function函数过程。VBA提供的关键字CALL，可显示调用一个子过程(Sub过程)，但却不能调用执行函数过程(Function过程)，此外Sub过程和Function过程都可以直接引用过程名来调用，因此选项B错误。Sub过程可以使用参数(由调用过程传递的常数、变量或表达式)，所以选项D错误。选项C要视具体情况才能确定。Sub过程执行操作但不返回值，Function过程可以返回值，这也是过程最根本的区别，所以选项A是正确的。

14．在窗体中添加一个命令按钮(名称为Commandl)，然后编写如下代码：(2006年9月)

PrivateSubCommandl_Click() A=0：b=5：c=6 MsgBox a=b+c End Sub

打开窗体运行后，如果单击命令按钮，则消息框的输出结果是 。

VBA理 论 练 习 题 第 19 页 共 42 页

A) 11 B) a=11 C) 0 D) False

解析：程序中“MsgBox a=b+c”表示在消息框中显示a与b+c的值比较的结果，由“a=0：b=5：c=6”可知，0!=11，所以消息框的输出结果为False。

15．在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码：(2006年9月)

Private Sub Commandl_Click( ) Dim a(10，10) For m=2 TO 4 For n=4 TO 5 a(m,n)=m*n Next n Next m

MsgBox a(2,5)+a(3,4)+a(4,5) End Sub

打开窗体运行后，单击命令按钮，则消息框的输出结果是 。 A) 22 B) 32 C) 42 D) 52

解析：根据程序，a(2,5)+a(3,4)+a(4,5)=2*5+3*4+4*5=42

16．在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事例代码：(2006年9月)

Private Sub Commandl_Click()

m=2.17 ‘Len(“abc”)=3

n=Len(Str$(m)+Space(5)) ‘Str$(2.17)=”□2.17” Me.Textl=n ‘Space(5)=”□□□□□” End Sub

打开窗体运行后，单击命令按钮，在文本框中显示。 A) 5 B) 8 C) 9 D) 10

解析：程序中“n=Len(Str$(m)+Space(5))”的含义是算出字符串总长度，当把正数转换成字符串时，Str$函数在字符串前面留有一个空格，Space(数值表达式)返回由数值表达式确定的空格个数组成的空字符串。Str$(m)表5个字符串，Space(5)表示5个字符 …… 此处隐藏：2494字，全部文档内容请下载后查看。喜欢就下载吧 ……