2014年9月计算机二级Access预测选择题(4)
22.VBA中不能进行错误处理的语句结构是( )。答案：C
A)On Error Then标号
B)On Error Goto标号
C)On Error Resume Next
D)On Error Goto 0
23.表达式Val("12 3E2CD")的值是( )。答案：A
A)123
B)12.3
C)0
D)123E2CD
24.设有如下过程：
x=1
Do
x=x+2
Loop Until _________
运行程序，要求循环体执行3次后结束循环，空白处应填入的语句是( )。答案：C
A)x<=7
B)x<7
C)x>=7
D)x>7
25.窗体中有命令按钮Command1，事件过程如下：
Public Function f(x As Integer)As Integer
Dim y As Integer
x=20
y=2
f=x*y
End Function
Private Sub Command1_Click()
Dim y As Integer
Static x As Integer
x=10
y=5
y=f(x)
Debug.Print x;y
End Sub
运行程序，单击命令按钮，则立即窗口中显示的内容是( )。答案：D
A)10 5
B)10 40
C)20 5
D)20 40
26.两个日期变量 D1=#2003-5-28 20:8:36# ，D2=#2004-2-29 10:40:11#。下列函数表达式中可以返回-9，即间隔9月的是( )。答案：B
A)DateAdd("m",-9,D1)
B)DateDiff("m",D2,D1)
C)DateDiff("m",D1,D2)
D)DateSerial(2004,2,29)
27.由“For i=1 To 9 Step -3”决定的循环结构，其循环体将被执行( )。答案：A
A)0次
B)1次
C)4次
D)5次
28.On Error Goto 0语句的含义是( )。答案：B
A)忽略错误并执行下一条语句
B)取消错误处理
C)遇到错误执行定义的错误
D)退出系统
29.在窗体中有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim s As Integer
s = P(1)+P(2)+P(3)+P(4)
debug.Print s
End Sub
Public Function P(N As Integer)
Dim Sum As Integer
Sum = 0
For i = 1 To N
Sum = Sum + i
Next i
P = Sum
End Function
打开窗体运行后，单击命令按钮，输出结果是( )。答案：B
A)15
B)20
C)25
D)35
30.表达式“B=INT(A+0.5)”的功能是( )。答案：B
A)将变量A保留小数点后1位
B)将变量A四舍五入取整
C)将变量A保留小数点后5位
D)舍去变量A的小数部分
31.若要在子过程Proc1调用后返回两个变量的结果，下列过程定义语句中有效的是( )。答案：A
A)Sub Proc1(n, m)
B)Sub Proc1(ByVal n, m)
C)Sub Proc1(n, ByVal m)
D)Sub Proc1(ByVal n, ByVal m)
32.下列表达式计算结果为数值类型的是( )。答案：B
A)#5/5/2010#-#5/1/2010#
B)"102">"11"
C)102=98+4
D)#5/1/2010#+5
33.在过程定义中有语句：
Private Sub GetData ( ByRef f As Integer)
其中“ByRef”的含义是( )。答案：B
A)传值调用
B)传址调用
C)形式参数
D)实际参数
34.要想在过程Proc调用后返回形参x和y的变化结果，下列定义语句中正确的是( )。答案：A
A)Sub Proc(x as Integer,y as Integer)
B)Sub Proc(ByVal x as Integer,y as Integer)
C)Sub Proc(x as Integer,ByVal y as Integer)
D)Sub Proc(ByVal x as Integer,ByVal y as Integer)
35.已知程序段：
s=0
For i=1 To 10 Step 2
s=s+1
i=i*2
Next i
当循环结束后，变量i、s的值各为( )。答案：C
A)10,4
B)11,3
C)22,3
D)16,4
36.软件(程序)调试的任务是( )。答案：A
A)诊断和改正程序中的错误
B)尽可能多地发现程序中的错误
C)发现并改正程序中的所有错误
D)确定程序中错误的性质
37.VBA中用实际参数a和b调用有参过程Area(m,n)的正确形式是( )。答案：B
A)Area m,n
B)Area a,b
C)Call Area(m,n)
D)Call Area a,b
38.在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a()
a=Array(1,3,5,7)
s=0
For i=1 To 3
s=s*10+a(i)
Next i
MsgBox s
End Sub
程序运行后，输出结果为( )。答案：B
A)135
B)357
C)531
D)753
39.假设有一组数据：工资为800元，职称为“讲师”，性别为“男”，在下列逻辑表达式中结果为“假”的是( )。答案：A
A)工资>800 AND 职称="助教" OR 职称="讲师"
B)性别="女" OR NOT 职称="助教"
C)工资=800 AND (职称="讲师" OR 性别="女")
D)工资>800 AND (职称="讲师" OR 性别="男")
40.执行下面的程序段后，x的值为( )。
x=5
For I=1 To 20 Step 2
x=x+I\5
Next I答案：C
A)21
B)22
C)23
D)24
41.在窗体中有一个名为Command1的命令按钮和一个名为Lb1的标签控件，Click事件代码如下：
Private Sub Command1_Click()
f=0
for n=1 To 10 Step 2
f=f+n
Next n
Me!Lb1.Caption=f
End Sub
单击命令按钮后，标签显示结果是( )。答案：D
A)16
B)14
C)26
D)25