国家二级ACCESS机试选择题（模块与VBA编程基础）模拟试卷18
选择题
1.可以用InputBox函数产生“输入对话框”。执行语句：
st=InputBox(”请输入字符串”，”字符串对话框\\(D)
A. aaaa
B. 请输入字符串
C. 字符串对话框
D. bbbb
解析：输入框用于在一个对话框中显示提示，等待用户输入正文并按下按钮、返回包含文本框内容的字符串数据信息。它的功能在VBA中是以函数的形式调用，其使用格式如下：
InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context]
InputBox有关参数说明如下表所示。
2.下列不属于VBA函数的是(B)
A. Choose
B. If
C. IIf
D. Switch
解析：IIf()函数，该函数可用于选择操作。调用格式为：IIf(条件表达式，表达式1，表达式2)
功能：函数根据“条件表达式”的值来决定返同值。如果“条件表达式”的值为“真”(True)，函数返回“表达式1”的值；“条件表达式”的值为“假”(Flase)，函数返回“表达式2”的值。Switch()函数，该函数可用于多条件选择操作。调用格式为：Switch(条件式1,表达式1[,条件式2,表达式2],[,条件式n，表达式n])
功能：函数分别根据“条件式1”、“条件式2”…“条件式n”的值来决定返回值。条件式是由左至右进行计算判断的，函数将返回第一个条件式为True的对应“表达式”的值。
Choose()函数，调用格式为：Choose(数值表达式，表达式1[，表达式2]…[，表达式n])
功能：函数根据“数值表达式”的值决定返回值。若不考虑变量的小数的定义位数，当“数值表达式”值大于1、小于2时，函数将返回“表达式1”的值；值大于2、小于3，返回“表达式2”的值，依此类推。以上3种函数均为VBA的函数。
3.下列关于VBA事件的叙述中，正确的是(A)
A. 触发相同的事件可以执行不同的事件过程
B. 每个对象的事件都是不相同的
C. 事件都是由用户操作触发的
D. 事件可以由程序定义
解析：事件是由系统定义的，事件的过程是由程序员定义的，因此触发相同的事件可以执行不同的事件过程：不同的对象可能有相同的实现，如很多控件都具有“获取焦点”事件。有些事件并不是用户触发的，如Resize事件。事件是由系统定义供程序员使用的，并不能由程序员定义。
4.用来测试当前读写位置是否达到文件末尾的函数是(A)
A. EOF
B. FileLen
C. Len
D. LOF
解析：在到达文件末尾之前，EOF函数一直返回False，到达文件末尾时，EOF返回True：FileLen函数返回一个文件的长度，单位为字节；Len返回文本串的字符数；LOF函数返回某文件的字节数。
5.下列表达式中，能够保留变量X整数部分并进行四舍五入的是(C)
A. Fix(x)
B. Rnd(x)
C. Round(x)
D. Int(x)
解析：Fix(x)和Int(x)返回x的整数部分，对于小数部分完全舍弃。Rnd(x)返回一个随机数，Round(x)保留x的整数部分并进行四舍五入。
6.VBA程序中，可以实现代码注释功能的是(D)
A. 方括号([])
B. 冒号(：)
C. 双引号(”)
D. 单引号(’)
解析：一个好的程序一般都有注释语句。这对程序的维护有很大的好处。在VBA程序中，注释可以通过以下两种方式实现：
使用Rem语句，格式为：
Rem注释语句
用单引号“’”，格式为：
’注释语句
7.在窗口中有一个标签L如elO和一个命令按钮Commandl，Commandl的事件代码如下：
Private Sub Command1_Click()
Labe10．Lefl=Label0．Left+100
End Sub
打开窗口，单击命令按钮，结果是(D)
A. 标签向左加宽
B. 标签向右加宽
C. 标签向左移动
D. 标签向右移动
解析：Left表示的是控件的左边距，所以left+100表示控件向右移动。
8.假定有以下循环结构
Do Until条件
循环体
Loop
则正确的叙述是(B)
A. 如果“条件?值为0，则一次循环体也不执行
B. 如果“条件”值为0，则至少执行一次循环体
C. 如果“条件”值不为0，则至少执行一次循环体
D. 不论“条件”是否为“真”，至少要执行一次循环体
解析：本题考查VBA中D0 Until…Loop循环的知识。对于这种循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环；在While循环中条件为True时执行循环体，条件为False时退出循环，这一点要注意区分清楚。本题中是先判断条件，条件值为0表示条件是False，则至少执行一次循环体。
9.假琵有以下程序段
n=0
for i=1 to 3
for i=一4 to-1
n=n+1
next j
next i
运行完毕后，n的值是(D)
A. 0
B. 3
C. 4
D. 12
解析：本题考查VBA中嵌套For循环的知识。这种问题要注意分析清楚每次循环的变化以及循环的次数。在这个循环中，内循环执行4次，外循环执行3次，所以里面的循环体语句n=n+1共执行12次，所以最终n的值为12。
10.以下程序段运行结束后，变量X的值为
X=2 ： y=4
Do
X=x*y：y=y+1
Loop While y＜4(C)
A. 2
B. 4
C. 8
D. 20
解析：本题考查VBA中循环的知识。在本题中用了Do…Loop While循环，先运行循环体后判断条件，当条件满足时继续循环，条件不满足时退出循环体。在本题中第一次循环结束后Y的值为5已经不满足条件，故此本循环只执行一次，x的值为2*4=8。
11.在窗体上添加一个命令按钮(名为Commandl)，然后编写如下事件过程：
Private Sub Commandl_Click()
For i=1 To 4
X=4
For j=1 To 3
x=3
For k=1 To 2
X=x+6本文档预览：3600字符，共15465字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
