[计算机类试卷]国家二级(VB)机试模拟试卷58及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷58及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷58及答案与解析.doc(28页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 58及答案与解析 一、选择题 1 对于文本框 Text1,能够获得按键的 ASCII码值的事件过程是 ( A) Text1_KeyUp ( B) Text1_KeyPress ( C) Text1_Click ( D) Text1_Change 2 命令按钮 Command1的 MouseUp事件过程结构如下: Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 则以下叙述中错误的是 ( A) X、 Y参数表示的是
2、Command1左上角在窗体中的位置 ( B) Button参数用于确定按下的鼠标键 ( C) Shift参数用于确定是否按下了 Alt、 Ctrl或 Shift键 ( D) MouseUp表示抬起鼠标按键时触发的事件 3 通用对话框 Filter属性的作用是 ( A)设置对话框的标题 ( B)指定对话框所选择的文件名 ( C)指定对话框的打开方式 ( D)指定对话框中显示的文件类型 4 以下关于菜单的叙述中错误的是 ( A)对于同一窗体中的菜单,各菜单项的名称必须唯一 ( B)对于同一窗体中的菜单,各菜单项的标题必须唯一 ( C)菜单中各菜单项可以是控件数组元素 ( D)弹出式菜单的编辑、定
3、义在菜单编辑器中进行 5 窗体上有一个名称为 Command1的命令按钮,其单击事件过程如下: Private Sub Command1_Click() For i = 3 To 1 Step -1 Sum = 0 For j = 1 To i Sum = Sum + i * j Next Next Print Sum End Sub 运行程序时,单击命令按钮,则窗体上显示的是 ( A) 1 ( B) 6 ( C) 18 ( D) 25 6 以下能够正常结束循环操作的程序段是 ( A) i = 5 Do i = i + 1 Loop Until i 0 i = i - 2 Loop ( D)
4、i = 0 Do While i 1 And j 1 Then a(i, j) = a(a(i - 1, j - 1), a(i, j - 1) + 1 Else a(i, j) = i * j End If Next Next Print a(2, 2); a(3, 3) End Sub 运行程序,单击命令按钮,窗体上显示的是 ( A) 1 3 ( B) 2 1 ( C) 2 2 ( D) 3 3 9 窗体上有一个名称为 Command1的命令按钮,并有如下程序代码: Private Sub Command1_Click() Static a a = 1: b = 2: c = 3 Call
5、 f(a, b, c) Print a; b; c End Sub Sub f(ByVal x, ByRef y, z) x = x + 1 y = y + 1 z = z + 1 End Sub 运行程序,单击命令按钮,窗体上显示的是 ( A) 1 3 3 ( B) 1 3 4 ( C) 2 3 3 ( D) 2 3 4 10 窗体上有一 个名称为 Command1的命令按钮,单击该按钮时所实现的功能 是产生 10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Comman
6、d1_Click() Dim a(10) As Integer Dim x As Integer For i = 1 To 10 a(i) = Int(Rnd * 100) Next x = InputBox(“输入 100以内的整数: “) p = 0 For i = 1 To 10 If a(i) = x Then p = i Exit For End If Next If p = 0 Then Print “没有找到与输入数据相同的数! “ Else Print Str(x) + “在数组中的位置是 “ + Str(p) End If End Sub 对于上述事件过程,以下叙述中正确的是
7、 ( A)本程序实际产生的随机数是 0-99 ( B)若产生的随机数中有相同数,则 p是其中最后一个数的位置 ( C)程序有错, p的初值设置不对 ( D)程序有错, InputBox函数产生的数据与 x的类型不匹配 11 窗体上有一个名称为 Command1的命令按钮,其单击事件过程如下: Private Sub Command1_Click() Dim s As Double s = 0: i = 1 Do While i a(i, j) Then y = a(i, j) Next s = s + a(i, i) Next Print x, y, s End Sub 关于以上程序,以下叙述
8、中错误的是 ( A)二维数组元素的值是不大于 99的随机整数 ( B)计算结果 x是二维数组各元素中的最大数 ( C)计算结果 y是二维数组各元素中的最小数 ( D)计算结果 s是二维数组各行第一个元素之和 13 窗体上有一个名称为 Text1的文本框,一个名称为 Command1的命令按钮。命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim x1 As Integer, x2 As Integer, x3 As Integer s = Trim(Text1.Text) strLen = Len(s) For i = 1 To strLen c =
9、Mid(s, i, 1) Select Case c Case “0“ To “9“ x1 = x1 + 1 Case “A“ To “Z“ x2 = x2 + 1 Case “a“ To “z“ x3 = 3 + 1 Case Else x4 = x4 + 1 End Select Next Print “x1“; x1, “x2“; x2, “x3“; x3, “x4“; x4 End Sub 以下关于上述程序的叙述中,正确的是 ( A) s是去掉文本框中字符串末尾的空格 ( B) Select Case c有误, Case后应该是一个表达式 ( C)各 Case分支条件有误,不能用 To
10、表示字符的取值区间 ( D) x4是字符串中非字母、非数字字符的个数 14 窗体上有一个名称为 Command1的命令按钮。要求编写程序,把文件 f1.txt的内容写到文件 f2.txt中,然后将 f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open “c:f1.txt“ For Input As #1 Open “c:f2.txt“ For Output As #2 Do While Not EOF(2) Line Input #1, str1 Print #2, str1 Loop Close Kill “c:f1.txt“ E
11、nd Sub 该程序运行时发生错误,应该进行的修改是 ( A)打开 f1.txt应该使用 Output 方式,打开 f2.txt 应该使用 Input 方式 ( B) Not EOF(2)应该改为 Not EOF(1) ( C) Line Input应改为 Get ( D) Close语句改为 Close All 15 下列叙述中正确的是 ( A)程序执行的效率与数据的存储结构密切相关 ( B)程序执行的效率只取决于程序的控制结构 ( C)程序执行的效率只取决于所处理的数据量 ( D)以上说法均错误 16 下列与队列结构有关联的是 ( A)函数的递归调用 ( B)数组元素的引用 ( C)多重循
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 58 答案 解析 DOC
