31. 在Access中，DAO的含义是：
A. 开放数据库互连应用编程接口 B. 数据库访问对象
C. Active数据对象 D. 数据库动态链接库
答案 B
解析：
数据访问对象(DAO)：数据访问对象是VBA提供的一种数据访问接口。
ActiveX数据对象(ADO)：ActiveX数据对象是基于组件的数据库编程接口。
ODBC: 开放数据库互连应用编程接口。
DLL: 数据库动态链接库
请参考本书 P206 13.3.6 考点6：VBA的数据库编程
32. 在窗体中有一个标签Label0，标题为“测试进行中”;有一个命令按钮Command1，事件代码如下：
| Private Sub Command1_Click() Label0.Caption="标签" End Sub Private Sub Form_Load() Form.Caption="举例" Command1.Caption="移动" End Sub |
答案 D
解析：打开窗体后，系统自动调用Form_Load()，这时Form的标题为"举例"，Command1的标题为"移动"，Label0的内容为“测试进行中”;当单击命令按钮后，Label0的内容更新为“标签”，Form的标题还是"举例"，Command1的内容还是"移动"，因此选择D。
请参考本书 P196 13.3.4 考点4：VBA程序流程控制语句
33. 在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：
| Option Compare Database Dim a As String*10 Private Sub Command1_Click() a="1234" b=Len(a) Me.Lb1.Caption=b End Sub |
打开窗体后单击命令按钮，窗体中显示的内容是
A. 4 B. 5
C. 10 D. 40
答案 A
解析："Dim a As String*10" 表示变量a的长度为10个字节,也就是5个汉字的长度! 如果所输入字符小于10 它会自动用空格补齐,如果大于10,则多余的部分则会被截掉,只保留前10个字符。a="1234"，b=Len(a)，b=4，因此窗体中显示的内容是4。
请参考本书 P185 13.3.3 考点3：VBA编程基础——常量、变量、运算符和表达式
34. 下列不是分支结构的语句是
A. If...Then...EndIf B. While...WEnd
C. If...Then...Else...EndIf D. Select...Case...End Select
答案 B
解析：While...WEnd是循环结构的语句，不是分支结构的语句。
请参考本书 P196 13.3.4 考点4：VBA程序流程控制语句
35. 在窗体中使有一个文本框(名为n)接受输入的值，有一个命令按钮run，事件代码如下：
| Private Sub run_Click() result="" For i=1 To Me!n For j=1 To Me!n result=result+"*" Next j result=result+Chr(13)+Chr(10) Next i MsgBox result End Sub |
打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图型是
A. **** B. *
**** ***
**** *****
**** *******
C. **** D. ****
****** ****
******** ****
********** ****
答案 A
解析：输入的n值为4时，For j=1 To 4 执行 result=result+"*"，此时result="****"，循环j结束后，执行result=result+Chr(13)+Chr(10)，相当于在字符串result="****"后面加一个回车换行符，再执行i循环3次后，输出的图型应该是A。
请参考本书 P196 13.3.4 考点4：VBA程序流程控制语句
责任编辑：小草
