1、国家二级 ACCESS机试选择题（ VBA编程）模拟试卷 2及答案与解析 一、选择题 1 在表达式中引用窗体上的控件值。下列选项中，语法格式正确的是 （ A） Foms 窗体名 控件名 （ B） Forms-窗体名 -控件名 （ C） Forms!窗体名 !控件名 （ D） Forms 窗体名 控件名 2 打开窗体后，下列事件中首先发生的是 （ A）加载 (Load) （ B）改变 (Change) （ C）调整大小 (Resize) （ D）成为当前 (Current) 3 下列选 项中，与 VBA中语句 DimVar， sum!等价的是 （ A） Dim Var As Double， su
2、m As Single （ B） Dim Var As Integer， sum As Double （ C） Dim Var As Single， sum As Double （ D） Dim Var As Integer， sum As Single 4 VBA中一般采用 Hungarian符号法命名变量，下列代表复选框的字首码是 （ A） Chk （ B） Cbo （ C） cmd （ D） opt 5 下列属于 VBA子字符串检索函数的是 （ A） Len （ B） InStr （ C） Right （ D） Replace 6 在 VBA程序中，编程打开窗体应使用的命令是 （ A）
3、Cmd Open Form （ B） Do Open Form （ C） DoCmd Open Form （ D） Command Open Form 7 调用下面子过程，消息框显示的值是 Sub SFun() Dim x， y， m x=10： y=100 Ify Modx Then m=x Else m=y End If MsgBox m End Sub （ A） X （ B） Y （ C） 10 （ D） 100 8 下列循环结构中，循环体被执行的次数是 Dim i As Integer， t As Integer Fori=9 to 0 t=t+1 Next i （ A） 0次 （ B
4、） 1次 （ C） 4次 （ D） 5次 9 有如下事件程序，运行该程序后输出结果是 Private Sub Command0_Click() Dim x As Integer， y As Integer x=1： y=0 Do Until y子宏名 （ D）宏名 子宏名 16 打开窗体后，下列事件中首先发生的是 （ A）获得焦点 (GotFocus) （ B）改变 (Change) （ C）激活 (Activate) （ D）成为当前 (Current) 17 VBA中，如果没有显式声明或使用符号来定义变量的数据类型，则变量的默认类型为 （ A）变体 （ B）布尔型 （ C）双精度 （ D）
5、货币 18 定义了数组 A(2to13)，则该数组元素个数为 （ A） 11 （ B） 12 （ C） 15 （ D） 10 19 VBA中采用 Hungarian符号法命名变量，下列代表子报表的字首码是 （ A） sub （ B） Rpt （ C） Fmt （ D） txt 20 运行程序，要求循环执行 3次后结束循环， 内应填入的语句是 x=1 Do x=x+2 Loop Until （ A） x=7 （ D） x7 21 运行下列程序，结果是 Private Sub Command0_Click() f0=1 k=1 Do While k=7，选项 C正确。 【知识模块】 VBA编程 2
6、1 【正确答案】 A 【试题解析】 本题考查的是 dowhile循环的执行过程，在每次循环之前，会检查循环条件表达式是否满足循环体是在条件表达式成立的前提下，才会执行。本题 k=5，循环体执行 5次，第 5次结束之后， f=5， k=6不满足再次循环的条件，所以最终 f=5，所以选择选项 A。 【知识模块】 VBA编程 22 【正确答案】 B 【试题解析】 本题考查是 while循环知识点。通过 while循环实现求取表达式的值，只要条件满足 ， while循环会一直继续。通过观察我们可以发现规律： while的每次循环 sum会加一项 (1+3+m) ，该项比上一次数据项多出一个数字，该数字
7、就是上个数据项最大值加 2，即 m的值，所以每次循环 m需要加 2。 【知识模块】 VBA编程 23 【正确答案】 A 【试题解析】 根据题意， 处的代码应实现的功能是在 ”课程表 ”中查询出 “课程编号 ”等于 tNum文本框中数据的 “课程名称 ”，此 DLookup函数有此功能。DLookup函数的格式为： DLookup(表达式，记录集 ，条件式 )。其中表达式用 来指定要查询的字段，即题中的 ”课程名称 ”。记录集用来指定要查询的范围，即题中的 “课程表 ”。条件式用来指定查询条件，即题中的 “课程编号 =”MeltNum“”，所以选择选项 A。 【知识模块】 VBA编程 24 【正
8、确答案】 A 【试题解析】 题目中对象变量 rs返回了当前窗体的 RecordSet属性记录集的引用，那么通过访问对象变量 rs的属性 ReordCount就可以得到该记录集的记录个数，引用方法为 rs ReordCount，所以选项 A正确。 【知识模块】 VBA编程 25 【正确 答案】 A 【试题解析】 本题中的， DoWhile循环是对记录集中的每一条记录的 “工龄 ”字段加 1，当执行更新操作 fd=fd+1之后，都需要使用 rs update语句将所更新的记录数据存储到数据库中，所以选项 A正确。 【知识模块】 VBA编程 26 【正确答案】 A 【试题解析】 宏是一个或多个操作的
9、集合，其中每个操作都可以实现特定的功能，使用简单，可以提高工作效率。可以设置自动运行或根据需要来进行数据统计计算以及根据需要设计条件宏，但宏不具有数据校验的功能，所以选择选项A。 【知 识模块】 VBA编程 27 【正确答案】 C 【试题解析】 “ApplyFilter”宏操作可以对表、窗体或报表应用筛选、查询或“SQL WHERE”子句，以便限制或排序表、基础表以及窗体或报表的查询中的记录，所以选项 C正确。 【知识模块】 VBA编程 28 【正确答案】 C 【试题解析】 Current事件是在窗体打开时，以及焦点从一条记录移动到另一条记录时发生： Activate是当一个对象成为活动窗口时
10、发生的事件； Change是指文本框或组合框的部分内容改变时发生的事件； GotFocus指窗体或控件获得焦点时发生的事件。以上四个事件，只有激活是打开窗体后最先发生的。 【知识模块】 VBA编程 29 【正确答案】 D 【试题解析】 IIF、 Switch和 Choose是 VBA的三个内置条件函数，而 If是条件语句不是函数。 【知识模块】 VBA编程 30 【正确答案】 C 【试题解析】 在对文本字符串进行排序时，首先比较第一个字符之后进行排序，若第一个字符相同则比较第二个字符，以此类推。因此对文本字符串 “23”、 “8”、“7”进行升序排序的结果为 “23”、 “7”、 “8”。所以选项 C正确。 【知识模块】 VBA编程
