2013年9月计算机二级access无纸化预测选择题十一
1.运行下列程序段，结果是( )。
For m = 10 To 1 Step 0
k = k + 3
Next m答案：B
A）形成死循环
B）循环体不执行即结束循环
C）出现语法错误
D）循环体执行一次后结束循环
2.假设某一数据库表中有一个地址字段，查找地址最后两个字为“8号”的记录的准则是( )。答案：A
A）Right([地址],2)="8号"
B）Right([地址],4)="8号"
C）Right("地址",2)="8号"
D）Right("地址",4)="8号"
3.以下合法的表达式是( )。答案：B
A）教师编号between 100000 and 200000
B）[性别]="男" or"女"
C）[基本工资]>=1000[基本工资]<=10000
D）[性别]like"男"=[性别]="女"
4.下列Case语句中错误的是( )。答案：C
A）Case 0 To 10
B）Case Is>10
C）Case Is>10 And Is<50
D）Case 3,5,Is>10
5.下列数组声明语句中，正确的是( )。答案：B
A）Dim A[3,4] As Integer
B）Dim A(3,4)As Integer
C）Dim A[3;4] As Integer
D）Dim A(3;4)As Integer
6.在窗体上有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = 12: y = 32
Call Proc(x, y)
Debug.Print x; y
End Sub
Public Sub Proc(n As Integer, ByVal m As Integer)
n = n Mod 10
m = m Mod 10
End Sub
打开窗体运行后，单击命令按钮，立即窗口上输出的结果是( )。答案：A
A）2 32
B）12 3
C）2 2
D）12 32
7.以下过程的功能是向数组中增加字符，则程序中下画线处应为( )
Private Sub AddToArray(arr(),arraycount%,ByVal charstring)
Dim i%, found As Boolean
found=False
For i=1 To arraycount
If array(i)=charstring Then
found=True
Exit For
End If
Next i
If Not found Then
arraycount= arraycount+1
———
arr(arraycount)=charstring
End If
End Sub答案：B
A）ReDim arr(arraycount)
B）ReDim Preserve arr(arraycount)
C）Dim arr(arraycount)
D）Dim Preserve arr(arraycount)
8.以下窗体加载事件程序如下：
Private Sub Form_Load()
Do
b = b + 1
If b = 5 Then Exit Do
Loop
Msgbox b
End Sub
此程序运行结果为( )。答案：A
A）5
B）6
C）7
D）8
9.在VBA中，如果没有显式声明或用符号来定义变量的数据类型，变量的默认数据类型为( )。答案：D
A）Boolean
B）Integer
C）String
D）Variant
10.给定日期DD，计算该日期当月最大天数的正确表达式是( )。答案：D
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))
热点专题推荐：2013年9月全国计算机等级考试考前10天冲刺专题
233网校编辑推荐：2013年9月等考试题悬赏※等考新政策※考前注意事项
欢迎进入：233网校“计算机二级在线模拟估分”助您考试顺利通关！
11.VBA 表达式3*33/3 的输出结果是( )。答案：C
A）0
B）1
C）3
D）9
12.在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：
Private Sub Command1_Click()
Dim i, j, x
For i = 1 To 20 Step 2
x = 0
For j = i To 20 Step 3
x = x + 1
Next j
Next i
Text1.Value = Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是( )。答案：A
A）1
B）7
C）17
D）400
13.假定有以下程序段：
n=0
for i=1 to 3
for j=-4 to -1
n=n+1
next j
next i
运行完毕后，n的值是( )。答案：D
A）0
B）3
C）4
D）12
14.下列变量名中，合法的是( )。答案：C
A）4A
B）A-1
C）ABC_1
D）private
15.以下返回值是“False”的语句是( )。答案：D
A）Value=(10>4)
B）Value=("ab"<>"aaa")
C）Value=("周"<"刘")
D）Value=(#2004/9/13#<=#2004/10/10#)
16.定义了二维数组A(2 to 5,5)，该数组的元素个数为( )。答案：B
A）20
B）24
C）25
D）36
17.要将“选课成绩”表中学生的成绩取整，可以使用( )。答案：B
A）Abs([成绩])
B）Int([成绩])
C）Sqr([成绩])
D）Sgn([成绩])
18.在调试VBA程序时，能自动被检查出来的错误是( )。答案：A
A）语法错误
B）逻辑错误
C）运行错误
D）语法错误和逻辑错误
19.有关VBA程序运行错误处理说法错误的是( )。答案：D
A）无论怎样为程序代码作彻底地测试与排错，程序错误仍可能出现
B）VBA中提供On Error GoTo语句来控制当有错误发生时程序的处理
C）“On Error GoTo 标号”语句在遇到错误发生时，程序转移到标号所指位置代码执行
D）“On Error GoTo 0”语句表示发生错误时，跳转至首行位置并向下执行
20.VBA中定义符号常量可以用关键字( )。答案：A
A）Const
B）Dim
C）Public
D）Static
热点专题推荐：2013年9月全国计算机等级考试考前10天冲刺专题
233网校编辑推荐：2013年9月等考试题悬赏※等考新政策※考前注意事项
欢迎进入：233网校“计算机二级在线模拟估分”助您考试顺利通关！
21.在模块的声明部分使用“Option Base 1”语句，然后定义二维数组A(2 to 5,5)，则该数组的元素个数为( )。答案：A
A）20
B）24
C）25
D）36
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的小数部分
热点专题推荐：2013年9月全国计算机等级考试考前10天冲刺专题
233网校编辑推荐：2013年9月等考试题悬赏※等考新政策※考前注意事项
欢迎进入：233网校“计算机二级在线模拟估分”助您考试顺利通关！
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+I5
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
热点专题推荐：2013年9月全国计算机等级考试考前10天冲刺专题
233网校编辑推荐：2013年9月等考试题悬赏※等考新政策※考前注意事项
欢迎进入：233网校“计算机二级在线模拟估分”助您考试顺利通关！