一、选择题
【例1】以下关于类模块的说法不正确的是
A)窗体模块和报表模块都属于类模块，它们从属于各自的窗体或报表
B)窗口模块和报表模块具有局部特性，其作用范围局限在所属窗体或报表内部 C)窗体模块和报表模块中的过程可以调用标准模块中已经定义好的过程
D)窗口模块和报表模块生命周期是伴随着应用程序的打开而开始、关闭结束 【例2】以下关于标准模块的说法不正确的是
A)标准模块一般用于存放其他Access数据库对象使用的公共过程 B)在Access系统中可以通过创建新的模块对象而进入其代码设计环境 C)标准模块所有的变量或函数都具有全局特性，是公共的
D)标准模块的生命周期是伴随着应用程序的运行而开始、关闭结束 【例3】在模块中执行宏“macro1”的格式为是（D）
A)function.RunMacro MacroName B)DoCmd.RunMacro macro1 C)Sub.RunMacro macro1 D)RunMacro macro1 【例 4】以下有关VBA中变量的叙述错误的是()
A)变量名的命名同字段命名一样，但变量命名不能包含有空格或除了下划线符号外的任何其他的标点符号
B)变量名不能使用VBA的关键字
C)VBA中对变量名的大小写敏感，变量名“Newyear”和“newyear”代表的是两个不同的变量
D)根据变量直接定义与否，将变量划分为隐含型变量和显式变量 【例5】在“NewVar=528”语句中，变量NewVar的类型默认为(B) A)Boolean B)Variant C)Double D)Integer 【例6】以下将变量NewVar定义为Interger型正确的是 A)integer NewVar B)Dim NewVar Of Integer
C)Dim NewVar As Integer D)Dim Interger NewVar
【例7】可以判定某个日期表达式能否转换为日期或时间的函数是 A)CDate B)IsDate C)Date D)IsText
【例8】以下哪个选项定义了10个整型数构成的数组，数组元素为NewArray(1)至NewArray(10)
A)Dim NewArray(10) As Integer B)Dim NewArray(1 To 10)As Integer C)Dim NewArray(10) Integer D)Dim NewArray(1 To 10) Integer 【例9】以下有关优先级的比较，正确的是
A)算术运算符>关系运算符>连接运算符 B)算术运算符>连接运算符>逻辑运算符 C)连接运算符>算术运算符>关系运算符 D)逻辑运算符>关系运算符>算术运算符 【例10】程序段：
For S=5 To 10 Step 1 S=2*S Next S
该循环执行的次数为
A)1 B)2 C)3 D)4 【例11】程序段： Dim I As Integer I=Int(-3.25)
I的返回值是
A)-3 B)-4 C)3 D)3.25 【例12】程序段： 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 【例13】程序段： str1=\ str2=\
s=Instr(str1, str2)
t=Instr(3,\ s的返回值是
A)3 B)4 C)5 D)6 【例14】程序段：
Dim str As String*10 Dim i
Str1=\ i=12
len1=Len(i)
str2=Right(str1,4) len1的返回值是
A)121 B)10 C)2 D)0 【例15】程序段： D=#2004-8-1# T=#12:08:20# MM=Month(D) SS=Second(T) MM的返回值是
A)2004 B)8 C)1 D)2004-8-1 【例16】程序段： str1=\
str2=\计算机等级考试\ str3=Right(str1,3) str3的返回值是
A)hel B)loworld C)rld D)hellowo 【例17】程序段： x=0
For i=1 to 10 step 2 x=x+i
i=i*2 Next i
当循环结束后，变量i的值为
A)22 B)10 C)11 D)16 【例18】程序段：
Str=\计算机科学技术\ Str=Mid(str,5) Str的返回值是
A)计算机科学 B)机科学技术 C)计算 D)学技术
8.5 同步练习 一、选择题
(1)VBA中定义符号常量可以用关键字
A)Const B)Dim C)Public D)Static (2)以下关于运算优先级比较，叙述正确的是
A)算术运算符>逻辑运算符>关系运算符 B)逻辑运算符>关系运算符>算术运算符 C)算术运算符>关系运算符>逻辑运算符 D)以上均不正确 (3)定义了二维数组A(2 to 5,5)，则该数组的元素个数为 A)25 B)36 C)20 D)24 (4)已知程序段： s=0
For I=1 to 10 step 2 s=s+1 I=I*2 Next I
当循环结束后，变量I的值为
A)10 B)11 C)22 D)16
(5)以下内容中不属于VBA提供的数据验证函数是
A)IsText B)IsDate C)IsNumeric D)IsNull
(6)VBA“定时”操作中，需要创建窗体的“计时器间隔(TimerInterval)”属性值。其计量单位是
A)微秒 B)毫秒 C)秒 D)分钟
(7)已定义好有参函数f(m)，其中形参m是整型变量。下面调用该函数，传递实参为5，将返回的函数值赋值给变量t。以下正确的是
A)t=f(m) B)t=Call f(m) C)t=f(5) D)t=Call f(5)
(8)在有参函数设计时，要想实现某个参数的“双向”传递，就应当说明该形参为“传址”调用形式。其设置选项是
A)ByVal B)ByRef C)Optional D)ParamArray
(9)在VBA代码调试过程中，能够显示出所有在当前过程中变量声明及变量信息的是 A)快速监视窗口 B)监视窗口 C)立即窗口 D)本地窗口 (10)VBA的逻辑值进行算术运算时，True值被当做 A)0 B)-1 C)1 D)任意值
(11)VBA中不能进行错误处理的语句结构是
A)On Error Then标号 B)On Error Goto 标号
C)On Error Resume Next D)Call Area a，b
(12)VBA中用实际参数a和b调用有参过程Area(m,n)的正确形式是 A)Area m, n B)Area a, b
C)Call Area(m, n) D)Call Area a, b
(13)能够实现从指定记录集里检索特定字段值的函数是
A)Nz B)DSum C)DLookup D)Rnd (14)DAO模型层次中处在最顶层的对象的是
A)DBEngine B)Workspace C)Database D)Recordset (15)ADO对象模型中可以打开Recordset对象的是 A)只能是Connection对象 B)只能是Command对象
C)可以是Connection对象和Command对象 D)不存在
(16)给定日期DD，可以计算当前月最大天数的正确表达式是 A)Day(DD)
B)Day(Dateserial(Year(DD),Month(DD),Day(DD))) C)Day(Dateserial(Year(DD,Month(DD),0)) D)Day(Dateserial(Year(DD),Month(DD)+1,0)) (17)VBA中定义局部变量可以用关键字
A)Const B)Dim C)Public D)Static (18)以下关于运算优先级比较，叙述正确的是
A)算术运算符>逻辑运算符>关系运算符 B)逻辑运算符>关系运算符>算术运算符 C)算术运算符>关系运算符>逻辑运算符 D)以上均不正确 (19)VBA表达式IIf(0,20,30)的值为
A)20 B)30 C)25 D)10
(20)连接式\＆ \＆ (2+3)的运算结果为
A)\ B)\ C)\ D)\(21)VBA表达式Chr(Asc(Ucase(\返回的值是 A)A B)97 C)a D)65
(22)定义了二维数组A(2 to 5,5)，则数组的元素个数为 A)25 B)36 C)20 D)24
(23)定义了三维数组A(5,5,5)，则该数组的元素个数为 A)15 B)25 C)125 D)216
(24)以下内容中不属于VBA提供的数据验证的函数是
A)IsText B)IsDate C)IsNumeric D)IsNull (25)假定有以下函数过程：
Function Fun(S As String) As String Dim s1 As String For i=1 to Len(S)
s1=UCase(Mid(S,i,1))+s1 Next i Fun=s1 End
Fun(\的输出结果为
A)abcdefg B)ABCDEFG C)gfedcba D)GFEDCBA
(26)已定义好有参函数f(m)，其中形参m是整型量。下面调用该函数，传递实参为5，将返回的函数值赋给变量t。以下正确的是
A)t=f(m) B)t=Call f(m) C)t=f(5) D)t=Call(5)
(27)在有参函数设计时，要想实现某个参数的“双向”传递，就应当说明该形参为“传址”调用形式。其设置选项是
A)ByVal B)ByRef C)Optional D)ParamArray (28)运行下面的程序段： For k=5 to 10 Step 2 k=k*2 Next k 则循环次数为
A)1 B)2 C)3 D)5
(29)VBA的逻辑值进行算术运算时，True值被当作 A)0 B)-1 C)1 D)任意值
(30)VBA中不能进行错误处理的语句结构是
A)On Error Then 标号 B) On Error Goto 标号 C) On Error Resume Next D) On Error Goto 0
(31)VBA中用实际参数a和b调用有参过程Area(m，n)的正确形式是 A)Area m,n B)Area a,b C)Call Area(m,n) D)Call Area a,b (32)表达式(\周\刘\返回的值是
A)False B)True C)-1 D)1 (33)下列算式正确的是
A)Fix(2.8)=3 B)Fix(-2.8)=-3 C)Fix(-2.8)=-2 D)以上都正确 (34)从字符串A=\中返回子串B=\的正确表达式为
A)B=Mid(A,3,2) B)B=Right(left(A,4),2) C)B=left(Right(A,4),2) D) A)、B)和C) (35)下面表达式为假的是
A)(4>3) B)((40 Or (3>2))=-1) C)((4 And (3<2))=1) D)(Not (3>=4)) (36)表达式(10.2\\5)返回的值是
A)0 B)1 C)2 D)2.04 (37)VBA表达式(12 Mod -5)返回的值为 A)0 B)1 C)2 D)-2 (38)表达式(-12.7 Mod -5)返回的值是 A)-1 B)-2 C)-3 D)-4
(39)能够实现从指定记录集里检索特定字段值的函数是 A)Nz B)DSum C)Dlookup D)Rnd (40)关于模块，下面叙述错误的是
A)是Access系统中的一个重要对象
B)以VBA语言为基础，以函数和子过程为存储单元 C)模块包括全局模块和局部模块
D)能够完成宏所不能完成的复杂操作 (41)窗体模块属于
A)标准模块 B)类模块 C)全局模块 D)局部模块 (42)函数String(n,字符串)的功能是