[计算机类试卷]国家二级(宏)机试模拟试卷2及答案与解析.doc
《[计算机类试卷]国家二级(宏)机试模拟试卷2及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(宏)机试模拟试卷2及答案与解析.doc(22页珍藏版)》请在麦多课文档分享上搜索。
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)使用宏
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 模拟 答案 解析 DOC
