[计算机类试卷]国家二级(VB)机试模拟试卷28及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷28及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷28及答案与解析.doc(29页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 28及答案与解析 一、选择题 1 以下合法的 VB变量名是 ( )。 ( A) _x ( B) 2y ( C) a#b ( D) x_1_x 2 以下关于 VB特点的叙述中,错误的是 ( )。 ( A) VB中一个对象可有多个事件过程 ( B) VB应用程序能以编译方式运行 ( C) VB应用程序从 Form_Load事件过程开始执行 ( D)在 VB应用程序中往往通过引发某个事件导致对对象的操作 3 有如下语句序列: Dim a, b As Integer Print a Print b 执行以上语句序列,下列叙述中错误的是 ( )。 ( A)输出的 a值是
2、0 ( B)输出的 b值是 0 ( C) a是变体类型变量 ( D) b是整型变量 4 以下关于控件数组的叙述中,错误的是 ( )。 ( A)各数组元素共用相同的事件过程 ( B)各数组元素通过下标进行区别 ( C)数组可以由不同类型的控件构成 ( D)各数组元素具有相同的名称 5 以下关于 VB文件的叙述中,正确的是 ( )。 ( A)标准模块文件的扩展名是 .frm ( B) VB应用程序可以被编译为 .exe文件 ( C)一个工程文 件只能含有一个标准模块文件 ( D)类模块文件的扩展名为 .bas 6 以下自定义数据类型的语句中,正确的是 ( )。 ( A) Type student
3、ID As String * 20 name As String * 10 age As Integer End student ( B) Type student ID As String * 20 name As String * 10 age As Integer End Type ( C) Type student ID As String name As String age As Integer End student ( D) Type ID As String * 20 name As String * 10 age As Integer End Type student 7
4、设: a 12, b 5, c 7,表达式 x (ac a Mod b) Int(13 / 5)的值是 ( )。 ( A) 5 ( B) 6 ( C) 7 ( D) 9 8 在程序中要使用 Array函数给数组 arr赋初值,则以下数组变量定 义语句中错误的是 ( )。 ( A) Static arr ( B) Dim arr(5) ( C) Dim arr() ( D) Dim arr As Variant 9 以下关于变量作用域的叙述中错误的是 ( )。 ( A)在窗体模块的声明部分声明的 Private变量,其作用域是窗体内的所有过程 ( B)在标准模块的声明部分声明的 Private变
5、量,其作用域是模块内的所有过程 ( C)在窗体模块的声明部分声明的 Pubilc变量,其作用域是本窗体的所有过程 ( D)在标准模块的声明部分声明的 Pubilc变量, 其作用域是应用程序的所有过程 10 下面关于文件叙述中错误的是 ( )。 ( A) VB数据文件需要先打开,再进行处理 ( B)随机文件每个记录的长度是固定的 ( C)不论是顺序文件还是随机文件,都是数据文件 ( D)顺序文件的记录是顺序存放的,可以按记录号直接访问某个记录 11 若要使文本框能够输入多行文本,应该设置的属性是 ( )。 ( A) MultiLine ( B) WordWrap ( C) ScrollBars
6、( D) AutoSize 12 以下关于命令按钮的叙述中正确的是 ( )。 ( A)命令按钮上可以显示图片 ( B)命令按钮能够分别响应单击、双击事件 ( C)程序运行时,不能改变命令按钮上的文字 ( D)若命令按钮的 Cancel属性设为 True,焦点在其他控件上时,按下回车键与单击该按钮的效果相同 13 窗体上有一个名称为 VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使 VScroll1.Value的值等于 ( )。 ( A) VScroll1.LargeChange ( B) VScroll1.SmallChange ( C) VScroll1.Max
7、 ( D) VScroll1.Min 14 设窗体名称为 frm1。以下叙述中正确的是 ( )。 ( A)运行程序时,能够加载窗体的事件过程是 frm1_Load ( B)运行程序时,能够加载窗体的事件过程是 Form1_Load ( C)程序运行中用语句: frm1.Name “New“ 可以更改窗体名称 ( D)程序运行中用语句: frm1.Caption “新标题 “ 可以改变窗体的标题 15 设运行程序时弹出的菜单如图所示 .关于该菜单,以下叙述中错误的是 ( )。*41 ( A)菜单中能够显示分隔线 是因为该菜单项的标题为 “ “ ( B)分隔线对应的菜单项的 Name属性可以为空
8、( C)退出菜单项的有效性属性被设为 False ( D)使用 PopupMenu方法能够显示如图所示的菜单 16 窗体上有一个列表框控件 List1。以下叙述中错误的是 ( )。 ( A) List1中有 ListCount 1个列表项 ( B)当 List1.Selected(i) True,表明第 i项被选中 ( C)设置某些属性,可以使列表框显示多列数据 ( D) List1.Text的值是最后一次被选中的列表项文本 17 以下 关于单选按钮和复选框的叙述中,正确的是 ( )。 ( A)单选按钮和复选框都能从多个选项中选择一项 ( B)单选按钮和复选框被选中时,选中控件的 Value属
9、性值为 True ( C)是否使用框架控件将单选按钮分组,对选项没有影响 ( D)是否使用框架控件将复选框分组,对选项没有影响 18 窗体的 MouseUp事件过程如下: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 关于以上定义,以下叙述中错误的是 ( )。 ( A)根据 Shift参数,能够确定使用转换键的情况 ( B)根据 X、 Y参数可以确定触发此事件时鼠标的位置 ( C) Button 参数的值是在 MouseUp事件发生时,系统自动产生的
10、 ( D) MouseUp是鼠标向上移动时触发的事件 19 窗体上有一个名称为 CD1的通用对话框,一个名称为 Command1的命令按钮,相应的事件过程如下: Private Sub Command1_Click() CD1.Filter “All File|*.*|Text File|*.txt|Word|*.Doc“ CD1.FilterIndex 2 CD1.FileName “E: Test.ppt“ CD1.InitDir “E: “ CD1.ShowOpen End Sub 关于上述程序,以下叙述中正确的是 ( )。 ( A)初始过滤器为 “*.*“ ( B)指定的初始目录为 “
11、E: “ ( C)以上程序代码实现打开文件的操作 ( D)由于指定文件类型是 .ppt,所以导致打开文件的操作失败 20 编写如下程序: Private Sub Command1_Click() Dim i As Integer, j As Integer n InputBox(“输入一个大于 1的正整数 “) For i 2 To n For j 2 To Sqr(i) If i Mod j 0 Then Exit For Next j If jSqr(i)Then Print i Next i End Sub 该程序的功能是 ( )。 ( A)判断 n是否为素数 ( B)输出 n以内所有的
12、奇数 ( C)输出 n以内所有的偶 数 ( D)输出 n以内所有的素数 21 以下程序的功能是随机产生 10个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i 1 To 10 a(i) Int(Rnd * 100) 1 Print a(i) Next i End Sub 运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是 ( )。 ( A) a(i) Int(Rnd * 100) ( B) a(i) Int(Rnd
13、* 90) 10 ( C) a(i) Int(Rnd * 100) 10 ( D) a(i) Int(Rnd * 101) 22 在窗体上画一个名称为 Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() n 0 For i 0 To 10 X 2 * i 1 If X Mod 3 0 Then n n 1 Next i Print n End Sub 运行程序,单击命令按钮,则窗体上显示的是 ( )。 ( A) 1 ( B) 3 ( C) 5 ( D) 7 23 窗体上有名称为 Command1的命令按钮,名称分别为 Label1、 Lab
14、el2、 Label3的标签。编写如下程序: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n 5 z z n y y n x x y Label1 x Label2 y Label3 z End Sub 运行程序,连续 3次单击命令按钮后, 3个标签中分别显示的是 ( )。 ( A) 5 5 5 ( B) 15 10 5 ( C) 15 15 15 ( D) 30 15 5 24 命令按钮 Command1的事件过程如下: Private Sub Command1_
15、Click() Dim arr(5, 5)As Integer Dim i As Integer, j As Integer For i 1 To 4 For j 2 To 4 arr(i, j) i j Next j Next i Print arr(1, 3) arr(3, 4) End Sub 执行上述过程,输出结果是 ( )。 ( A) 6 ( B) 7 ( C) 11 ( D) 12 25 现有程序如下: Option Base 1 Private Sub Form_Click() Dim x(5, 6)As Integer, y(5)As Integer For i 1 To 5
16、For j 1 To 6 x(i, j) Int(Rnd * 9 1) Next j Next i Call f(5, 6, x, y) For i 1 To 5 Print y(i); Next i End Sub Sub f(m As Integer, n As Integer, a()As Integer, b()As Integer) For i 1 To m b(i) 0 For j 1 To n b(i) b(i) a(i, j) Next j Next i End Sub 关于上述程序,以下叙述中正确的是 ( )。 ( A)调用过程语句有错,参数不匹配 ( B)程序有错,数组下标
17、越界 ( C) y数组中保存的是 x数组每行数据之和 ( D) x数组中数据的取值范围是 1 10 26 窗体上有一个名称为 Label1的标签;一个名称为 Timer1的计时器,其 Enabled和 Interval属性分别为 True和 1000。编写如下程序: Dim n As Integer Private Sub Timer1_Timer() ch Chr(n Asc(“A“) Label1.Caption ch n n 1 n n Mod 4 End Sub 运行程序,将在标签中 ( )。 ( A)不停地依次显示字符 “A“、 “B“、 “C“、 “D“,直至窗体被关闭 ( B)依
18、次显示字符 “A“、 “B“、 “C“、 “D“各一次 ( C)每隔 1秒显示字符 “A“一次 ( D)每隔 1秒依次显示 26个英文字母中的一个 27 窗体上有一个名称为 Command1的命令按钮,一个名称为 Text1的文本框。编写如下程序: Private Sub Command1_Click() Dim x As Integer x Val(InputBox(“输入数据 “) Text1 Str(x fun(x) fun(x) End Sub Private Function fun(ByRef n As Integer) If n Mod 3 0 Then n n n Else n
19、 n * n End If fun n End Function 对于上述程序,以下叙述中错误的是 ( )。 ( A)语句 fun n 有错,因为 n是整型, fun没有定义类型 ( B)运行程序 ,输入值为 5时,文本框中显示 655 ( C)运行程序,输入值为 6时,文本框中显示 42 ( D) ByRef表示参数按址传递 28 设工程文件中包名称分别为 Form1、 Form2的两个窗体,且 Form1的菜单属性设置如下: 窗体 Form1中的程序如下: Dim Flag As BooleanPrivate Sub Form_Load() Flag TrueEnd SubPrivate
20、Sub mnu1_Click(index As Integer) If Index 1 Then If Flag True Then Form2.show mnu1(1).Caption “隐藏窗体 2“ Flag False Else Form2.Hide mnu1(1).Caption “显示窗体 2“ Flag True End If End If If Index 2 Then EndEnd Sub关于上述程序,以下叙述中错误的是 ( )。 ( A) Index属性的值可以用来区分控件数组元素 ( B) Index为 1的菜单项的标题可能会改变 ( C)两个名称均为 Mnu1的菜单项构
21、成一个控件数组 ( D)语句 Form2.Hide将 Form2卸载 29 有如下程序: Private Sub Command1_Click() Dim i As Integer, j As Integer Dim sum As Integer n 1 Do j 1 Do sum sum j j j 1 Print j; Loop Until j3 n n 2 Loop Until n10 Print sum End Sub 运行上述程序,外层 Do循环执行的次数为 ( )。 ( A) 4 ( B) 5 ( C) 7 ( D) 10 30 以下过程的功能是从数组中寻找最大值: Private
22、 Sub FindMax(a()As Integer, ByRef Max As Integer) Dim s As Integer, f As Integer Dim i As Integer s LBound(a) f UBound(a) Max a(s) For i s To f If a(i)Max Then Max a(i) Next End Sub 以下关于上述过程的叙述中,错误的是 ( )。 ( A)语句 Call FindMax(a, m)可以调用该过程,其中的 a是数组, m是 Integer类型变量 ( B) For循环次数等于 a数组的元素数 ( C)过程末尾应该增加一条
23、返回最大值的语句 FindMax Max ( D)参数 Max用于存放找到的最大值 31 下列叙述中正确的是 ( A)算法的效率只与问题的规模有关,而与数据的存储结构无关 ( B)算法的时 间复杂度是指执行算法所需要的计算工作量 ( C)数据的逻辑结构与存储结构是一一对应的 ( D)算法的时间复杂度与空间复杂度一定相关 32 下列叙述中正确的是 ( A)线性表链式存储结构的存储空间一般要少于顺序存储结构 ( B)线性表链式存储结构与顺序存储结构的存储空间都是连续的 ( C)线性表链式存储结构的存储空间可以是连续的,也可以是不连续的 ( D)以上说法均错误 33 某二叉树共有 12个结点,其中叶
24、子结点只有 1个。则该二叉树的深度为(根结点在第 1层) ( A) 3 ( B) 6 ( C) 8 ( D) 12 34 对长度为 n的线性表作快速排序,在最坏情况下,比较次数为 ( A) n ( B) n-1 ( C) n(n-1) ( D) n(n-1)/2 35 结构化程序设计中,下面对 goto语句使用描述正确的是 ( A)禁止使用 goto语句 ( B)使用 goto语句程序效率高 ( C)应避免滥用 goto语句 ( D)以上说法均错误 36 下面不属于软件测试实施步骤的是 ( A)集成测试 ( B)回归测试 ( C)确认测试 ( D)单元测试 37 下面不属于软件需求分析阶段主要
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 28 答案 解析 DOC
