[计算机类试卷]国家二级(VB)机试模拟试卷167及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷167及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷167及答案与解析.doc(28页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 167及答案与解析 一、选择题 1 下列数据结构中,能用二分法进行查找的是 ( )。 ( A)无序线性表 ( B)线性链表 ( C)二叉链表 ( D)顺序存储的有序表 2 下列叙述中,不属于设计准则的是 ( )。 ( A)提高模块独立性 ( B)使模块的作用域在该模块的控制域中 ( C)设计成多入口、多出口模块 ( D)设计功能可预测的模块 3 下列队列的描述中,正确的是 ( )。 ( A)队列属于非线性表 ( B)队列在队尾删除数据 ( C)队列按 “先 进后出 ”进行数据操作 ( D)队列按 “先进先出 ”进行数据操作 4 对下列二叉树进行前序遍历的结果为
2、( )。 ( A) ABCDEFGH ( B) ABDGEHCF ( C) GDBEHACF ( D) GDHEBFCA 5 对于长度为 n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是 ( )。 ( A)冒泡排序为 n(n 1) 2 ( B)简单插入排序为 n ( C)希尔排序为 n ( D)快速排序为 n 2 6 为了使模块尽可能独立,要求 ( )。 ( A)内聚程度要尽量高,耦合程度要尽 量强 ( B)内聚程度要尽量高,耦合程度要尽量弱 ( C)内聚程度要尽量低,耦合程度要尽量弱 ( D)内聚程度要尽量低,耦合程度要尽量强 7 下列选项中不属于软件生命周期开发阶段任务的是
3、 ( )。 ( A)软件测试 ( B)概要设计 ( C)软件维护 ( D)详细设计 8 数据独立性是数据库技术的重要特点之一。所谓数据独立性是指 ( )。 ( A)数据与程序独立存放 ( B)不同的数据被存放在不同的文件中 ( C)不同的数据只能被对应的应用程序所使用 ( D)以上三种说法都不对 9 在学 校中, “班级 ”与 “学生 ”两个实体集之间的联系属于 ( )关系。 ( A)一对一 ( B)一对多 ( C)多对一 ( D)多对多 10 软件调试的目的是 ( )。 ( A)发现错误 ( B)改善软件的性能 ( C)改正错误 ( D)验证软件的正确性 11 下列不能打开菜单编辑器的操作是
4、 ( )。 ( A)按 Ctrl+E键 ( B)单击工具栏中的 “菜单编辑器 ”按钮 ( C)执行 “工具 ”菜单中的 “菜单编辑器 ”命令 ( D)按 Shift+Alt+M键 12 以下 ( )对象不能作为容器。 ( A) Frame ( B) From ( C) PictureBox ( D) Image 13 关于自定义数据类型,下面叙述中不正确的是 ( )。 ( A)自定义数据类型必须在窗体模块或标准模块的通用声明段进行声明 ( B)在窗体模块中定义自定义数据类型时必须使用 Private关键字 ( C)自定义数据类型只能在窗体模块的通用声明段进行声明 ( D)自定义数据类型中的元素
5、的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型 14 8 6787E+8写成普通的十进制数是 ( )。 ( A) 86 787 000 ( B) 867 870 000 ( C) 8 678 700 ( D) 8 678 700 000 15 设 x=4, y=8, z=7,则以下表达式的运算结果是 ( )。 x y And(Not y z)Or Z X ( A) 1 ( B) 1 ( C) True ( D) False 16 将文本框的 ( )属性设置为 True时,文本框可以输入或显示多行文本,且会自动换行。 ( A) Text ( B) ScrollBars ( C)
6、MultiLine ( D) Enabled 17 在窗体 Form1上放一个名为 Text1的文本框和一个名为 Command1的命令按钮,然后编写一个事件过程。要求程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为 “VB等级考试二级 ”。以下能正确实现上述操作的事件过程是 ( )。 ( A) Private Sub Text1_Change() Command1 Caption=“VB等级考试二级 “ End Sub ( B) Private Sub Command1_Click() Caption=“VB等级考试二级 “ End Sub ( C) Private Sub
7、Form1_Click() Text1 Caption=“VB等级考试二级 “ End Sub ( D) Private Sub Commandl_Click() Text1 Text=“VB等级考试二级 “ End Sub 18 设 a是整型变量,与函数 IIf(a 0, a, a)有相同结果的代数式是 ( )。 ( A) a ( B) a ( C) a ( D) a 19 在窗体上画一个名称为 Text1的文本框,然后画一个名称为 Hscroll1的滚动条,其 Min和 Max属性分别为 0和 1000。程序运行后,如果移动滑块,则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是
8、( )。 ( A) Private Sub Hscroll1_Change() Text1 Text=HScroll1 Value End Sub ( B) Private Sub Hscroll1_Click() Text1 Text=HScroll1 Value End Sub ( C) Private Sub Hscroll1_Change() Text1 Text=Hscroll1 Caption End Sub ( D) Private Sub Hscroll1_Click() Text1 Text=Hscroll1 Caption End Sub 20 下列可以打开立即窗口的操作是
9、 ( )。 ( A) Ctrl+D ( B) Ctrl+E ( C) Ctrl+F ( D) Ctrl+G 21 下列程序段的执行结果为 ( )。 x=Int(Rnd+3) Select Case x Case 5 Print“A Row“ Case 4 Print“B Row“ Case 3 Print“C Row“ Case Else Print“D Row“ End Select ( A) A Row ( B) B Row ( C) C Row ( D) D Row 22 以下能够正确退出循环的是 ( )。 ( A) i=10 Do i=i+1 Loop Until i 10 ( B)
10、i=1 Do i=i+1 Loop Until i=10 ( C) i=10 Do i=i+1 Loop Until i 0 ( D) i=1 Do i=i 3 Loop Until i=0 23 下列程序执行后,其输出结果为 ( )。 Dim a(5) For i=0 To 4 a(i)=i+1: m=i+1 If m=3 Then a(m 1)=a(i 2)Else a(m)=a(i) Ifi=2 Then a(i 1)=a(m 3) a(4)=i Print a(i); Next i ( A) 1 1 1 4 4 ( B) 1 2 3 4 1 ( C) 1 2 1 4 4 ( D) 1
11、1 1 4 1 24 编写如下事 件过程: Private Sub Form_Activate() Dim score(1 To 3)As Integer Dim i As Integer t As Variant For i=3 To 1 Step-1 score(i)=2*i Next i For Each t In score Print t: Next End Sub 程序运行后窗体上显示 ( )。 ( A) 6 4 2 ( B) 2 4 6 ( C) 2 ( D) 6 25 设有如下程序: Option Base () Private Sub Form_Click() Dim a D
12、im i As Integer a=Array(1, 2, 3, 4, 5, 6, 7, 8, 9) For i=0 To 3 Print a(5 i); Next End Sub 程序运行后,单击窗体,则在窗体上显示的是 ( )。 ( A) 4 3 2 1 ( B) 5 4 3 2 ( C) 6 5 4 3 ( D) 7 6 5 4 26 表达式 4+5 6*7 8 Mod 9的值是 ( )。 ( A) 4 ( B) 5 ( C) 6 ( D) 7 27 在窗体上有一个名为 Text1的文本框和一个名为 Commandl的命令按钮,并编写有如下事件过程: Private Sub Comman
13、dl_Click() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 Ifi 10 Then Exit For Next Text1 Text=Str(n) End Sub 程序运行后,单击命令按钮,在 文本框中显示的是 ( )。 ( A) 2 ( B) 3 ( C) 4 ( D) 5 28 在窗体上画一个名称为 Text1的文本框,然后画 3个单选按钮,并用这 3个单选按钮建立一个名为 Option1的控件数组,程序运行后,如果单击某个单选按钮,则文本框中的字体根据所选择的单选按钮切换,如图 1所示。请选择适合空白处的语句 (
14、 )。 Private Sub Optionl_Click(Index As Integer)Select Case_ Case 0: a=“宋体 “ Case 1: a=“黑体 “ Case 2: a=“楷体 GB2312“ End SelectText1 _=aEnd Sub ( A) Option Text ( B) Index Text ( C) Index Font ( D) Option Font 29 设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i=1 To 4 x=x*a(i) Next End Sub
15、在窗体上画一个名称为 Text1的文本框和一个名称为 Commandl的命令 按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim arr(5)As Integer, n As Integer n=1 For i=1 To 4 arr(i)=i+i Next Fun arr,n Text1 Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是 ( )。 ( A) 30 ( B) 25 ( C) 20 ( D) 15 30 在窗体上画一个文本框,然后编写如下事件过程: Private Sub Textt_KeyPre
16、ss(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char) Text1 Text=String(6, KeyAScii) End Sub 程序运行后,如果在键盘上输入字母 “a”,则文本框中显示的内容为 ( )。 ( A) a ( B) A ( C) aaaaaa ( D) AAAAAA 31 以下对文件分类的划分不正确的是 ( )。 ( A)文件分 为程序义件和数据文件 ( B)文件分为有结构文件和无结构文件 ( C)文件分为 ASCII文件和二进制文件 ( D)文件分为顺序文件
17、和随机文件 32 在窗体上有一个名称为 Commandl的命令按钮,并编写有如下事件过程: Private Sub Commandl_Click() Dim rec As animal Open“c: vbTest dat“For Random As#1 Len=Len(rec) rec animalName=“cat“ rec aColor=“White“ Put#1, rec Close#1 End Sub 记录类型定义如下: Private Type animal animalName As String*20 aColor As String*10 End Type 下列叙述中正确的是
18、 ( )。 ( A)记录类型 animal不能在 Form1中定义,必须在标准模块中定义 ( B)如果文件 c: vbTest dat不存在,则 Open命令执行失败 ( C)由于 Put命令中没有指明记录号,因此每次都把记录写到文件的末尾 ( D)语句 “Put#1, rec”将 animal类型的两个数据元素写到文件中 33 文本框接受的最长字符数由文本框的 ( )属性确定。 ( A) MaxLength ( B) MultiLine ( C) Width ( D) Text 34 以下事件过程的功能是:从已存在于磁盘上的顺序文件 Num1 txt中读取数据,计算读出数据的平方值,将该数据
19、及其平方值存入新的顺序文件 Num2 txt中。则在以下横线处合适的语句是 ( )。 Private Sub Form_Click() Dim x As Single, y As Single Open“Num1 txt“For Input As#1 Open“Num2 txt“For Output As#2 Do While Not EOF(1) _ Print x y=x2 _ Print y Loop Close#1, #2 End Sub ( A) Input#1, y Print#2, x, y ( B) Input#2, x Print#1, x, y ( C) Print#1,
20、x Input#2, x, y ( D) Input#1, x Print#2, x, y 35 下列程序的执行结果为 ( )。 n=0 j=1 Do Until n 2 n=n+1: j=j+n*(n+1) Loop Print n; j ( A) 0 1 ( B) 3 7 ( C) 3 21 ( D) 3 13 36 下列程序在运行时输出的结果是 ( )。 Option Base 1 Private Sub Form_Click() Dim x(10) For i=1 To 10 x(i)=10 i+1 Next i For i=10 To 1 Step-2 Print x(i) Next
21、 i End Sub ( A) 1 3 5 7 9 ( B) 9 7 5 3 1 ( C) 1 2 3 4 5 6 7 8 9 10 ( D) 10 9 8 7 6 5 4 3 2 1 37 运行下列程序时,输出的结果是 ( )。 Private Sub Form Click() Dim x x=Array(“Software“, “and“, “Hardware“, “System“) For i=LBound(x, 1)To UBound(x, 1) If Left(x(i), 1)=“S“Then Print x(i); Next i End Sub ( A) Software ( B)
22、 Software System ( C)出错信息 ( D) SoftwareandHardwareSystem 38 窗体上命令按钮 Commandl的事件过程如下: Option Base1 Private Sub Commandl_Click() Dim a(4, 4)As Variant For i=1 To 4 For j=1 To 4 a(i, j)=(i 1)*3+j Next i Next i For i=3 To 4 For j=3 To 4 Print a(i, j) Next i Next i End Sub 该程序执行后,输出结果是 ( )。 ( A) 9 10 12
23、13 ( B) 7 10 12 13 ( C) 9 12 10 13 ( D) 8 11 9 12 39 用 Line Input语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到 ( )分隔符,即认为 一行的结束。 ( A)文件结束符 ( B)回车符 ( C)空格 ( D) Tab字符 40 有以下程序段,当在消息框中输入 8后, y的值为 ( )。 x=InputBox(“Enter an Integer“) x=CInt(x) Select Case x Case Is =0 y=0 Case Is =10 y=5+2*x Case Is =15 y=x 5 Case Is 1
24、5 y=0 End Select ( A) 18 ( B) 19 ( C) 20 ( D) 21 二、基本操作题 41 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画出包含三个命令按钮的控件数组,名称为 cmd1,下标分别为 0、 1、 2, Caption分别为 “开始 ”、 “停止 ”和 “退出 ”,如图 3(a)所示。通过属性窗口设置各命令按钮的属性,使得程序开始运行时, “停止 ”按钮不可见, “退出 ”按钮不可用,如图 3(b)所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为 sjt1 frm,
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 167 答案 解析 DOC
