VBA测试题（二）

VBA基础练习题（二）

姓名：

班级：

成绩：

一、选择题

1．VBA中定义符号常量可以用关键字( ) A)Const B)Dim C)Public D)Static

2．Sub过程和Function过程最根本的区别是( )

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

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

3．定义了二维数组A(2 to 5，5)，则该数组的元素个数为( ) A)25 B)36 C)20 D)24

4．在有参函数设计时，要想实现某个参数的“双向”传递，就应当说明该形参为“传址”调用形式。其设置选项是( )

A)ByVal B)ByRef C)Optional D)ParamArray

5．在VBA代码调试过程中，能够显示出所有在当前过程中变量声明及变量值信息的是 A)快速监视窗口 B)监视窗口 C)立即窗口 D)本地窗口 6．VBA的逻辑值进行算术运算时，True值被当作( ) A)0 B)-1 C)1 D)任意值

7．下列关于宏和模块的叙述中，正确的是( ) A)模块是能够被程序调用的函数 B)通过定义宏可以选择或更新数据

C)宏或模块都不能是窗体或报表上的事件代码

D)宏可以是独立的数据库对象，可以提供独立的操作动作 8．假设有如下Sub过程：

Sub sfun(ByVal x As Single, ByRef Y As Single) t = x x = t / Y Y = t Mod Y End Sub

在窗体中添加一个命令按钮(名为Comnndl)，编写如下事件过程 Private Sub Commandl_Click() Dim a , b As Single a=5:b=4

call sfun(a,b)

MsgBox a & space(2) & b End Sub

打开窗体运行后，单击命令按钮，消息框中有两行输出，内容分别为( ) A)1和1 B)1.25和l C)5和4 D)5和1 9. 运行下面的调用p1子过程，显示结果为（ ） Sub 调用p1()

Dim a%, y%, z%

1

x = 5: y = 7: z = 0 Call p1(x, y, z) MsgBox z End Sub

Sub p1(ByVal a As Integer, b As Integer, c As Integer) c = a + b End Sub

10．InputBox函数返回值的类型默认为( )

A)数值 B)字符串 C)变体 D)数值或字符串

11．在MsgBox(prompt，buttons，title，hetpfite，context)函数调用形式中必须提供的参数是 A)prompt B)buttons C)title D)context

12．窗体上添加有3个命令按钮，分别命名为Commandl、Command2和Command3。编写Commandl的单击事件过程，完成的功能为：当单击按钮Commandl时，按钮Command2可用，按钮Command3不可见。以下正确的是（ ） A)Private Sub Commandl_Click() B)PrivateSub Commandl_Click() Command2.Visible=True Command2.Enabled=true Command3.Visible=False Command3.Enabled=False End Sub End Sub C)Private Sub Commandl_Click() D)Private SubCommandl_Click() Command2.Enabled=True Command2.Visible=True Command3.Visible=False Command3.Enabled=False End Sub End Sub

13．下列逻辑表达式中，能正确表示条件“x和Y都是奇数”的是( ) A) x Mod 2=1 Or y Mod 2=1 B) x Mod 2=0 Or y Mod 2=0 C) x Mod 2=1 And y Mod 2=1 D) x Mod 2=0 And y Mod 2=0

14．VBA程序的多条语句可以写在一行中，其分隔符必须使用符号( ) A)： B)’ C)； D)，

15．VBA表达式3*3＼3／3的输出结果是( ) A) 0 B) 1 C) 3 D) 9 16、有如下程序段： Dim str As String Dim i

Str1=\ i=12

len1=Len(i )

str2=Right(str1,4)

执行后，len1和str2的返回值分别是（ ）。

A.12，abcd B.10，bcde C.2，defg D.0，cdef 17、以下可以得到“2+6=8”的结果的VBA表达式是（ ）。

A.“2+6” &”=” & 2+6 B.”2+6”+”=”+2+6 C.2+6& “=” & 2+6 D.2+6 +”=” + 2+6 18、程序段：

Dim I, J As Integer

I=Int(-3.65)

2

J=Fix(-3.65)

I, J的返回值是（ ）。

A)-3 , -3 B)-4, -3 C)3 , -4 D)-3.7, -3.7

19、执行下面的语句后，所弹出的信息框外观样式为（ ）。 MsgBox \

20、程序段：

Dim M As Single Dim N As Single Dim P As Single M=Abs(-7) N=Int(-2.4) P=M+N

P的返回值是（ ）。

A)9 B)-9 C)5 D)4 21、程序段： str1=\ str2=\

s=Instr(str1, str2)

t=Instr(3,\ s的返回值是（ ）。 A)3 B)4 C)5 D)6 22、程序段：

str1=\

str2=\计算机等级考试\ str3=Right(str1,3)

str3的返回值是（ ）。

A)hel B)loworld C)rld 23、程序段： D=#2004-8-1# T=#12:08:20#

D)hellowo 3

MM=Month(D) SS=Second(T)

MM的返回值是（ ）。

A)2004 B)8 C)1 D)2004-8-1

24、用于获得字符串str从第1个字符开始的4个字符的函数是（ ）。

A .mid(str,1,3) B .middle(str,1,4) C .right(str,1,3) D .left(str,4) 二、填空题。

1．___________的全称是 Visual Basic for Application。 2．模块包含了一个______区域和一个或多个子过程(以______开头)或函数过程(以_________开头)。

3．VBA中变量作用域分为3个层次，是___________、___________和_______________。 4．在模块的申明区域中，用____________或____________关键字申明的变量是模块范围的变量；而用_________关键字说明的变量是属于全局范围的变量。

5．要在程序或函数的实例间保留局部变量的值，可以用________关键字代替Dim。

6．VBA语言中，函数___________的功能是输入数据对话框；___________函数的功能是显示消息信息。

7．在VBA中浮点双精度的类型关键字是________，标识符是________。

8．VBA编程中，要得到[15，75]上的随机整数可以用表达式______________________。 9．VBA中打开“登陆”窗体的命令语句是_____________________

10．Access的窗体或报表事件可以有两种方法来响应：宏对象和__________。

11、VBE的代码窗口顶部包含两个组合框，左侧为对象列表，右侧为( )。 12.以下程序段运行后，消息框的输出结果为( )。 a=abs (-3)

b=LEN(STR(20)) c=a=b

msgbox (c+1)

13、写出下列表达式的值：

(5+8*3)\\3 ( ) \ 123 & \ ) ?#11/22/99# ( ) 3^2+8 ( ) Chr(97) ( ) Asc(“A”) ( )

14、编写一个求解圆面积的函数过程Ａrea（）,再编写一个子过程调用此函数计算圆面积。（圆半径值由用户输入，使用msgbox显示计算的面积） FUNCTION Area( r as single) as single Area = 3.14 * r^2 End FUNCTION Sub 调用() Dim x As Single Dim s As Single x = Val(InputBox(\请输入半径的值\s = Area(x) MsgBox \圆的面积为\End Sub 4