1、国家二级（宏）机试模拟试卷 2及答案与解析 一、选择题 1 Beep命令用于 （ A）最大化激活窗口 （ B）最小化激活窗口 （ C）将最大化或最小化窗口恢复至原始大小 （ D）使计算机发出 “嘟嘟 ”声 2 MsgBox命令用于 （ A）显示消息框 （ B）关闭或打开系统消息 （ C）从其他数据库导入和导出数据 （ D）从文本文件导入导出数据 3 TransferDatabase命令用于 （ A）显示消息框 （ B）关闭或打开系统消息 （ C）从其他数据库导入和导出数据 （ D）从文本文件导入导出 数据 4 若变量 i的初值为 8，则下列循环语句中循环体的执行次数为 Do While i=1
2、7 i=i+2 Loop （ A） 3次 （ B） 4次 （ C） 5次 （ D） 6次 5 InputBox函数的返回值类型是 （ A）数值 （ B）字符串 （ C）变体 （ D）视输入的数据而定 6 下列能够交换变量 x和 y值的程序段是 （ A） Y=X： X=Y （ B） Z=X： Y=Z： X=Y （ C） Z=X： X=Y： Y=Z （ D） Z=X： W=Y： Y=Z： X=Y 7 窗体中有命令按钮 commanddl和文本框 Textl，事件过程如下： Function result(ByVal x As Integer)As Boolean Ifx Mod 2=0 Then
3、result=True Else result=False End If End Function Private Sub Commandl_Click0 x=Val(InputBox(“请输入一个整数 “) If_Then Textl=str(x) “是偶数 “ Else Textl=str(x) “是奇数 “ End If End Sub 运行程序，单击命令按钮，输入 19，在 Textl中会显示 “19是奇数 ”。那么在程序的空白处应填写 （ A） result(x)=“偶数 ” （ B） result(x) （ C） result(x)=“奇数 ” （ D） NOT result(x)
4、 8 窗体有命令按钮 Commandl和文本框 Textl，对应的事件代码如下： Private Sub Command l-Click() For i=l To 4 x=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next i Textl Value=Str(x) End Sub 运行以上 事件过程，文本框中的输出是 （ A） 6 （ B） 12 （ C） 18 （ D） 21 9 窗体中有命令按钮 run34，对应的事件代码如下： Private Sub run34_Enter() Dim hum As Integer， a As Int
5、eger， b As Integer， i As Integer For i=l To 10 num=InputBox(“请输入数据： “， “输入 “) If Int(num 2)=num 2 Then a=a+1 Else b=b+1 End If Next i MsgBOx(“运行结果： a=“ Str(A “， b=“ Str(B) End Sub 运行以上事件过程，所完成的功能是 （ A）对输入的 10个数据求累加和 （ B）对输入的 10个数据求各自的余数，然后再进行累加 （ C）对输入的 10个数据分别统计奇数和偶数的个数 （ D）对输入的 10个数据分别统计整数和非整数的个数
6、10 运行下列程序，输入数据 8、 9、 3、 0后，窗体中显示结果是 Private Sub Form_click0 Dim sum As Integer， m As Integer sum=O Do m=InputBox(“输入 m“) sum=sum+m Loop Until m=0 MsgBox sum End Sub （ A） 0 （ B） 17 （ C） 20 （ D） 21 11 运行 下列程序段，结果是 For m=10 to 1 step 0 k=k+3 Nextm （ A）形成死循环 （ B）循环体不执行即结束循环 （ C）出现语法错误 （ D）循环体执行一次后结束循环 1
7、2 运行下列程序，结果是 Private Sub Command32_Click() f0=1： f1=1： k=1 Do While k=5 f=f0+f1 f0=f1 f1=f k=k+1 Loop MsgBox“f=“ f End Sub （ A） f=5 （ B） f=7 （ C） f=8 （ D） f=13 13 有如下事件程序，运行该程序后输出结果是 Private Sub Command33_Click() Dim x As Integer， y As Integer x=1： y=0 Do Until y=25 y=y+x*X x=x+1 Loop MsgBox“x=“ X “
8、， y=“ y End Sub （ A） x=1， y=0 （ B） x=4， y=25 （ C） x=5， y=30 （ D）输出其他结果 14 下列程序的功能是计算 sum=1+(1+3)+(1+3+5)+(1+3+5+39) Private Sub Command34_Click() t=0 m=1 sum=0 Do T=t+m Sum=Sum+t m=_ Loop While m=39 MsgBox“Sum=“ sun End Sub 为保证程序正确完成上述功能，空白处应填入的语句是 （ A） m+l （ B） m+2 （ C） t+1 （ D） t+2 15 由 “For i=l T
9、o 16 Step 3”决定的循环结构被执行 （ A） 4次 （ B） 5次 （ C） 6次 （ D） 7次 16 若要限制宏命令的操作范围，可以在创建宏时定义 （ A）宏操作对象 （ B）宏条件表达式 （ C）窗体或报表控件属性 （ D）宏操作目标 17 在设计条件宏时，对于连续重复的条件，要替代重复条件式可以使用下面的符号 （ A） （ B） = （ C）， （ D）； 18 宏是指一个或多个 （ A）命令集合 （ B）操作集合 （ C）对象集合 （ D）条件表达式集合 19 要限制宏命令的操作范围，可以在创建宏时定义 （ A）宏操作对象 （ B）宏条件表达式 （ C）窗体或报表控件属性
10、（ D）宏操作目 标 20 VBA的自动运行宏，应当命名为 （ A） AutoExec （ B） Autoexe （ C） Auto （ D） AutoExec bat 21 在 Access数据库系统中，不是数据库对象的是 （ A）数据库 （ B）报表 （ C）宏 （ D）数据访问页 22 创建宏时不用定义 （ A）宏名 （ B）窗体或报表控件属性 （ C）宏操作目标 （ D）宏操作对象 23 能产生宏操作的是 （ A）创建宏 （ B）编辑宏 （ C）运行宏 （ D）创建宏组 24 关于宏叙述错误的是 （ A）宏是 Access的一个对象 （ B）宏的主要功能是使操作自动进行 （ C）使用宏
11、可以完成许多繁杂的人工操作 （ D）只有熟悉掌握各种语法、函数，才能编写出功能强大的宏命令 25 宏组中宏的调用格式是 （ A）宏组名宏名 （ B）宏组名 !宏名 （ C）宏组名 宏名 （ D）宏组名 (宏名 ) 26 宏中的每个操作都有名称，用户 （ A）能够更改操作名 （ B）不能更改操作名 （ C）能对有些宏名进行更改 （ D）能够调用外部命令更改操作名 27 一个非条件宏，运行时系统会 （ A）执行部分宏 操作 （ B）执行全部宏操作 （ C）执行设置了参数的宏操作 （ D）等待用户选择执行每个宏操作 28 下列操作适合使用 VBA而非宏的是 （ A）数据库的复杂操作和维护 （ B）建
12、立自定义菜单栏 （ C）从工具栏上的按钮执行自己的宏或者程序 （ D）将筛选程序加到各个记录中，从而提高记录查找的速度 29 通过从 “数据库 ”窗口拖曳什么向宏中添加操作， Access将自动为这个操作设置适当的参数 （ A）宏对象 （ B）窗体对象 （ C）报表对象 （ D）数据库对象 30 在操作参数中输入表达式时， 不能用 “=”开头的是什么操作的表达式参数 （ A） OpenForm （ B） Openreport （ C） SetValue （ D） RunApp 31 表达式： IsNull(名字 )的含义是 （ A）没有 “名字 ”字段 （ B） “名字 ”字段值是空值 （ C
13、） “名字 ”字段值是空字符串 （ D）检查 “名字 ”字段名的有效性 32 用于打开窗体的宏命令是 （ A） OpenForm （ B） OpenReport （ C） OpenQuery （ D） OpenTable 33 用于打开查询的宏命令是 （ A） OpenForm （ B） OpenReport （ C） OpenQuery （ D） OpenTable 34 用于从文本文件中导人和导出数据的宏命令是 （ A） InputText （ B） AddText （ C） TransferText （ D） InText 35 宏命令 SetWarnings的功能是 （ A）设置属性值
14、 （ B）关闭或打开屏幕系统消息 （ C）显示警告框 （ D）设置提示信息 36 宏命令 OpenReport打开报表，则可以显示该报表的视图是 （ A） “打印 ”视图 （ B） “设 计 ”视图 （ C） “打印预览 ”视图 （ D）以上都是 37 如果要在 VisualBasic中运行 Opentable操作，可使用哪个对象的 Opentable方法 ? （ A） DoCmd （ B） Form （ C） Report （ D） Query 38 下面关于 “宏 ”与 VisualBasic叙述正确的是 （ A）任何宏操作都可以通过编写相应的 VBA代码实现其功能 （ B）对于任何事物性
15、、重复性较强的操作应使用宏命令实现 （ C）任何宏都可以转换为等价的 VBA代码 （ D）以上都正确 39 在 Access系统中，宏是按 （ A）名称调用的 （ B）标识符调用的 （ C）编码调用的 （ D）关键字调用的 40 若想取消自动宏的自动运行，打开数据库时应按住 （ A） Alt键 （ B） Shift键 （ C） Ctrl键 （ D） Enter键 41 条件宏的条件项是一个 （ A）字段列表 （ B）算术表达式 （ C）逻辑表达式 （ D） SQL语句 42 条件宏的条件项的返回值是 （ A） “真 ” （ B） “假 ” （ C） “真 ”或 “假 ” （ D）不能确定 43
16、 VBA表达式 3*3 3 3的输出结果是 （ A） 0 （ B） 1 （ C） 3 （ D） 9 44 在窗体中添加一个命令按钮 (名称为 Commandl)，然后编写如下代码： Private Sub Command l_Click() a=0： b=5： c=6 MsgBox a=b+c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为 （ A） 11 （ B） a=11 （ C） 0 （ D） False 45 在窗体上添加一个命令按钮 (名为 Commandl)和一个文本框 (名为 Textl)，并在命令按钮中编写如下事件代码： Private Sub Comm
17、and 1 Click() m=2 17 n=Len(Str$(m)+Space(5) Me!Textl=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示 （ A） 5 （ B） 8 （ C） 9 （ D） 10 46 有如下语句： S=Int(100*and) 执行完毕后 ， S的值是 （ A） 0， 99的随机整数 （ B） 0,100的随机整数 （ C） 1,99的随机整数 （ D） 1,100的随机整数 国家二级（宏）机试模拟试卷 2答案与解析 一、选择题 1 【正确答案】 D 【知识模块】 宏 2 【正确答案】 A 【知识模块】 宏 3 【正确答案】 C 【知识模块】
18、 宏 4 【正确答案】 C 【知识模块】 宏 5 【正确答案】 B 【知识模块】 宏 6 【正确答案】 C 【知识模块】 宏 7 【正确答案】 B 【知识模块】 宏 8 【正确答案】 D 【知识模块】 宏 9 【正确答案】 C 【知识模块】 宏 10 【正确答案】 C 【知识模块】 宏 11 【正确答案】 B 【知识模块】 宏 12 【正确答案】 D 【知识模块】 宏 13 【正确答案】 A 【知识模块】 宏 14 【正确答案】 B 【知识模块】 宏 15 【正确答案】 C 【知识模块】 宏 16 【正确答案】 B 【知识模块】 宏 17 【正确答案】 A 【知识模块】 宏 18 【正确答案】
19、 B 【知识模块】 宏 19 【正确答案】 B 【知识模块】 宏 20 【正确答案】 A 【知识模块】 宏 21 【正确答案】 A 【知识模块】 宏 22 【正确答案】 B 【知识模块】 宏 23 【正确答案】 C 【知识模块】 宏 24 【正确答案】 D 【知识模块】 宏 25 【正确答案】 A 【知识模块】 宏 26 【正确答案】 B 【知 识模块】 宏 27 【正确答案】 B 【知识模块】 宏 28 【正确答案】 A 【知识模块】 宏 29 【正确答案】 D 【知识模块】 宏 30 【正确答案】 C 【知识模块】 宏 31 【正确答案】 B 【知识模块】 宏 32 【正确答案】 A 【知
20、识模块】 宏 33 【正确答案】 C 【知识模块】 宏 34 【正确答案】 C 【知识模块】 宏 35 【正确答案】 B 【知识模块】 宏 36 【正确答案】 D 【知识模块】 宏 37 【正确答案】 A 【知识模块】 宏 38 【正确答案】 D 【知识模块】 宏 39 【正确答案】 A 【知识模块】 宏 40 【正确答案】 B 【知识模块】 宏 41 【正确答案】 C 【知识模块】 宏 42 【正确答案】 C 【知识模块】 宏 43 【正确答案】 D 【知识模块】 宏 44 【正确答案】 D 【知识模块】 宏 45 【正确答案】 D 【知识模块】 宏 46 【正确答案】 A 【知识模块】 宏
