1、VB笔试模拟试卷 92及答案与解析 1 下列陈述中正确的是 _ 。 （ A）二叉树是度为 2的有序树 （ B）二叉树中结点只有一个孩子时无左右之分 （ C）二叉树中必有度为 2的结点 （ D）二叉树中最多只有两棵子树，并且有左右之分 2 深度为 k的二叉树至多有 _ 。 （ A） 2k个结点 （ B） 2k-1个结点 （ C） 2K-1结点 （ D） 2k-1-1个结点 3 在有 n个结点的 -31链表中，值为非空的链域的个数为 _ 。 （ A） n-1 （ B） 2n-1 （ C） n+1 （ D） 2n+1 4 对二叉树从 1开始进行连续编号，要求每个结点的编号大于其左右孩子的编号，同一个
2、结点的左右孩子中，其左孩子的编号小于其右孩子的编号，则可采用 _ 遍历实现编号。 （ A）无序 （ B）中序 （ C）后序 （ D）从根开始的层次遍历 5 结构化程序设计的一种基本方法是 _ 。 （ A） 归纳法 （ B）逐步求精法 （ C）递归法 （ D）穷尽法 6 为了提高测试的效率，应该 _ 。 （ A） 随机地选取测试数据 （ B）取一切可能的输入 数据作为测试数据 （ C）在完成编码以后制定软件的测试计划 （ D）选择发现错误可能性大的数据作为测试数据 7 程序的三种基本控制结构是 _ 。 （ A） 过程、子程序和分程序 （ B）顺序、选择和重复 （ C）递归、堆栈和队列 （ D）调
3、用，返回和转移 8 数据的逻辑独立性是指 _ 。 （ A）存储结构与物理结构的逻辑独立性 （ B）数据与存储结构的逻辑独立性 （ C）数据与程序的逻辑独立性 （ D）数据元素之间的逻辑独立性 9 两个关系有若干相同属性名等值连接，并去掉 重复属性的关系代数运算称为_ 。 （ A）取列运算 （ B）投影运算 （ C）自然连接 （ D）选择运算 10 设有关系模式 R(A， B， C， D， E， F)，其函数依赖集为 ED ， CB ， (C， E)F ， BA ，则 R最高达到 _ 。 （ A） 1NF （ B） 2NF （ C） 3NF （ D） BCNF 11 运行 VB程序的快捷键为 _
4、 。 （ A） F4 （ B） F5 （ C） F6 （ D） F7 12 只能用来显示字符信息的控件是 _ 。 （ A） 文本框 （ B）标签框 （ C）图片框 （ D）图像框 13 以下程序输出 1到 1000之间所有的偶数之和，请补充完该程序。 Private Sub Cotmand1_Click() Dim x As Double For i=0 To 1000 If_ Then x=x+ i End If Next i Print x End Sub （ A） i Mod 2= 0 （ B） x mod 2=0 （ C） I mod 2 0 （ D） x mod 2 0 14 下面程
5、序段的功能是 _ 。 A=10.5 B=Int (A=0.6) Debug. Print B （ A）求平均值 （ B）将一实数四舍五入取整数 （ C）求绝对值 （ D）舍去一实数的小数部分 15 关子设置控件属性的叙述正确 的是 _ 。 （ A）用户必须重新设置属性的值，否则属性值为空。 （ B）任何属性的值都可以由用户随意设置。 （ C）属性值可以由用户设置，也可以使用系统的默认设置。 （ D）属性值只能在属性窗口中设置。 16 以下哪个是合法的变量名 _ 。 （ A） Len （ B） Test qw （ C） 6cost_1 （ D） count2s 17 有如下自定义过程： Sub
6、test(x As Integer) x =X *2+1 If x 6 Then Call test(x) End If x=x* 2 + 1 Print x； End Sub调用该过程的事件过程如下： Private Sub Command1_Click() test 2End Sub则该段程序的执行结果是_ 。 （ A） 12 （ B） 23 47 （ C） 23 （ D） 5 10 18 在窗体上画一个命令按钮，然后编写如下事件过程 : Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2
7、x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮 ,输出结果是 _ 。 （ A） 7 （ B） 15 （ C） 157 （ D） 538 19 下列程序段的招待结果是 _ 。 s=0 t=0 u=0 For i = 1 To 3 For j = 1 To i For k = j To 3 s=s+ 1 Next k t=t+1 Next j u=u+ 1 Next i Print s; t; u （ A） 14 6 3 （ B） 6 14 3 （ C） 9 8 7 （ D） 8 9 10 20 下列程序段的执行结果为 _ 。 Dim
8、 A(10， 10) For I = 2 To 4 For J = 4 To 5 A(I, J) = I * J Next J Next I Print A(2, 5) + A(3, 4) + A(4, 5) （ A） 22 （ B） 42 （ C） 32 （ D） 52 21 下列程序的输入值分别为 100,10则执行结果为非作歹 _ 。 m=Val (inputbox (“请输入数学 1”) ) n=Val (inputbox (“请输入数学 2”) ) If n*m=0 Then MsgBox “两数能不能为 0” Exit Sub If m n Then t=m: m=n: n=t E
9、nd If End If DO R=m Mod n m=n n=f Loop While r 0 Print m （ A） 10 （ B） 100 （ C） 50 （ D） 250 22 下列程序段的执行结果为 _ 。 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 23 下列程序段的执行结果是 _ 。 a=0 b=0 For i = -1 To -2 Step -1 For j = 1 To 2 b=b+1 Next j a=a+1 Next i Pr
10、int a; b （ A） 24 （ B） - 20 （ C） 42 （ D） 22 24 有如下函数 :Private Function firstfunc(x As Integer, y As Integer) As Integer Dim n As Integer Do While n = 4 x=x +y n=-+1 Loop firstfunc = x End Function调用该函数的事件过程如下 :Private Sub Command1_lick() Dim x As Integer Dim y As Integer Dim n As Integer Dim z As Int
11、eger x=1 y=1 For n = 1 To 3 z = firstfunc(x, y) Next n Print z End Sub该事件过程的执行结果是 _。 （ A） 1 （ B） 3 （ C） 16 （ D） 9 25 以下程序段的执行结果是 _。 Dim A(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 3 - m + 1 Then A(m, n) =m + n Else A(m, n) = 0 End If Next n Next m For m = 1 To 3 For n = 1 To 3 Print A(m, n
12、); Next n Print Next m （ A） 1 1 1 1 1 1 1 1 1 （ B） 2 0 4 0 4 0 4 0 6 （ C） 0 0 0 0 0 0 0 0 0 （ D） 1 0 1 0 1 0 1 0 1 26 对象可以识别和响应的某些操作行为称为 _ 。 （ A） 属性 （ B）方法 （ C）多态 （ D）事件 27 当程序运行时，在窗体上单击鼠标，以下 _ 事件是窗体不会接收到的。 （ A） MouseDown （ B） MouseUp （ C） Load （ D） Click 28 如果在 C盘当前文件夹下已存在名为 StuDatA.dar的顺序文件，那么执行语句
13、Open“C: StuDatA.dar” For Append As #1之后将 _ 。 （ A）删除文件中原有内容。 （ B）保留文件中原有内容，可在文件尾添加新内容。 （ C）保留文件中原有内容，在文件头开始添加新内容。 （ D）以上均不对。 29 在用 Open语句打开文件时，如果省略 “For方式 ”，则打开的文件的存取方式是_ 。 （ A）顺序输入方式 （ B）顺序输出方式 （ C）随机存取方式 （ D）二进制方式 30 GUI的含义是 _ 。 （ A）面向对象的程序设计 （ B）开放数据库连接 （ C）图形设 备接口 （ D）图形用户界面 31 下列程序段的执行结果是 _ 。 k=
14、0 For j=1 To 2 For i=1 To 3 k = i+ 1 Next i For i=1 To 7 k= k + 1 Next i Next j Print k （ A） 11 （ B） 10 （ C） 9 （ D） 8 32 在窗体上添加一个命令按纽，名为 COMgAND1，事件过程如下： Private Sub CQmmand1_Click() x =0 Do Until c = -1 a=InputBox(“请输入 a的值 ”) a=Val (A) b=InputBox(“请输入 b的值 ”) b=Val(B) c=InputBox(“请输 入 c的值 ”) c=Val (
15、C) a=a+b+c Loop Print a End Sub程序运行后，单击命令按纽，依次在输入对话框中输入 5， 4，3， 2， 1， -1后，输出的结果是 _ 。 （ A） 2 （ B） 3 （ C） 4 （ D） 5 33 单击命令按钮时，下列程序代码的执行结果为 _ 。 Public Function MyFune(m As Integer， n As Integer) As Integer Do While m n Do While m n m=m-n Loop Do While m n n=n -m Loop Loop MyFunc=mEnd FunctionPrivate Su
16、b Command1_Click() Print MyFunc(24, 18)End Sub （ A） 2 （ B） 4 （ C） 6 （ D） 8 34 有程序如下 : Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为 _ 。
17、 （ A） 2 4 6 8 （ B） 5 2 2 2 （ C） 10 12 14 16 （ D）出错 35 在窗体 上画一个命令按钮，然后编写如下代码 :Private Type Record ID As Integer Name As String * 20End TypePrivate Sub Command1_Click() Dim MaxSize, NextChar, MyChar Open “d:tempfemale. txt” For Input As #1 MaxSize = LOF(1) For NextChar = MaxSize To 1 Step -1 Seek #1,
18、NextChar MyChar = Input(1, # 1) Next NextChar Print EOF(1) Close #1End Sub程序运行后 ,单击命令按钮 ,其输出结果为 _。 （ A） True （ B） False （ C） 0 （ D） Null 36 当循环队列非空且队尾指针等于队头指针时，说明循环队列已满，不能进行人队运算。这种情况称为【 】。 37 软件工程的出现是由于【 】。 38 软件设计模块化的目的是【 】。 39 软件开发环境是全面支持软件开发全过程的【 】集合。 40 关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、 【 】和自定义完整性。
19、 41 执行语句 Print”25+32 ”， 25+32的输出结果是 【 】。 42 表达式 Fix(-32)+Int(-24)的值为【 】。 43 在 VB中向组合框中增加数据项所采用的方法为【 】 。 44 在 VB中，语句定义符 Const定义的是【 】。 45 表达式 Asc(“A”) if b =10 Then Exit Do Loop 47 一组具有相同名称，不同下标的下标变量称为【 】。 48 把窗体的 KeyPreview属性设置为 True，并编写如下两个事件过程： Private Sub Form_KeyDown (KeyCode As Integer， Shift As
20、 Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAseii As Integer) Print KeyAscii End Sub 程序运行后，如果将 CapsLock 键锁定在大写的状态，这时按下 A键时，则：在窗体上输出的输出 结果为【 】和【 】。 49 以下程序段的输出结果是【 】。 num=0 While hum =2 num=num+1 Print num Wend 50 下面的程序用 “冒泡 ”法将数组 a中的 10个整数按升序排列，请在【 】、【 】、【 】处将程序补充完整。 Option Bas
21、e 1 Private Sub Command1_Click () Dim a a=Array (678, 45, 324, 528, 439, 387, 87, 875, 273,823) For i=【 】 For j=【 】 If a(i)【 】 a(j) Then a1=a(i) a(i)=a(j) a (j) =a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub VB笔试模拟试卷 92答案与解析 1 【正确答案】 D 2 【正确答案】 C 3 【正确答案】 A 4 【正确答案】 C 5 【正确答案】 B 6
22、【正确答案】 D 7 【正确答案】 B 8 【正确答案】 C 9 【正确答案】 C 10 【正确答案】 A 11 【正确答案】 B 12 【正确答案】 B 13 【正确答案】 A 14 【正确答案】 B 15 【正确答案】 C 16 【正确答案】 D 17 【正确答案】 B 18 【正确答案】 B 19 【正确答案】 A 20 【正确答案】 B 21 【正确答案】 A 22 【正确答案】 C 23 【正确答案】 A 24 【正确答案】 C 25 【正确答案】 B 26 【正确答案】 D 27 【正确答案】 C 28 【正确答案】 B 29 【正确答案】 C 30 【正确答案】 D 31 【正确
23、答案】 A 32 【正确答案】 A 33 【正确答案】 C 34 【正确答案】 A 35 【正确答案】 B 36 【正确答案】 上溢 【试题解析】 入队运算是指在循环队列的队尾加入一个新元素。这个运算有两个基本操作：首先将队尾指针进一 (即 rear rear+1)，并当 rear=m+1时置 rear l；然后将新元素插入队尾指针指向的位置。当循环队列非空 (s 1)时且队尾指针等于队头指针时，说明循环队列已满，不能进行人队运算，这种情况称为 “上溢 ”。 37 【正确答案】 软件危机的出现 【试题解析】 软件工程的出现是由于软件危机的出现。 38 【正确答案】 降低复杂度 【试题解析】 软
24、件设计模块化的目的是降低复杂度。 39 【正确答案】 软件工具 【试题解析】 软件开发环境是全面支持软件开发全过程的软件工具集合。 40 【正确答案】 参照完整性 【试题解析】 关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、参照完整性和自定义完整性。 41 【正确答案】 25+32=57 【试题解析】 本题主要是对 Print方法的考查。题中 “25+32=“是一个字符串，故原样输出。后边是一表达式，故应输出其结果值。最后的输出结果为：25+32=57。 42 【正确答案】 -56 【试题解析】 Fix函数的意义是求整数部分。 Int函数的意义是求不大于自变量的最大整数。表达式
25、Fix(-32)的值为 -32，表达式 Int (-24)的值为 -24。故表达式Fix(-32)+ Int(-24)的结果值为 -56。 43 【正确答案】 AddItem 【试题解析】 组合框中增加数据项采用 Addh-am方法；删除数据项用RemoveItem方法；删除所有项目用 Clear方法。 44 【正确答案】 常量 【试题解析】 在 VB中，语句定义符 Const定义的是常量。常用 Const来定义符号常量。符号常量具有变量的外表和常量的内涵，即符号常量用标识符表示，看上去像变量，但是符号常量不允许被修改，实质上是常量。定义符号常量的一般格式为： Const常量名表达式 ，常量名
26、 =表达式 或 Const常量名 As类型 表达式 ，常量名 As类型 表达式 ) 45 【正确答案】 65A 【试题解析】 函数 Asc的含义是将字符转换成 ASCII代码，故表达式 Asc(“A”)的值为 65，函数 Chr的含义是将 ASCII代码转换成字符，故表达式 Chr(“65”)的值为 A，然后再将两个表达式的值相连接即为表达式 Ase(“A”)&Chr (“65”)的值65A。 46 【正确答案】 1 3 6 10 【试题解析】 根据初始化条件 a=0， b 0，执行 DoLoop循环语句，第一次执行语句 a a+l得 a的值为 1，然后执行语句 b b+a即 b 0+1(注意
27、：此时 a的值不是。而是 1)得 b的值为 1。接着输出语句，最后判断 b的值，满足条件继续执行循环语句 a=a+l得 a的值为 2。执行语句 b b+a即 b 1+2(此时 a值为前一语句得出的结果， b值为上一次循环时的结果值 )。然出输出 b的值。再判断 b的值是否满足条件。依此类推。第三次的输出结果为 6，第四次的输出结果为 10。然后再判断 h的值发现不满足条件，退出 Do循环。 47 【正确答案】 数组 【试题解析】 一组具有相同名称，不同下标的下标变量称为数组。在计算机中数组占据一块内存区域，数组名是这个区域的名称，下标可标识数 组元素在该区域的位置。 48 【正确答案】 A , 65 49 【正确答案】 1,2,3 50 【正确答案】 a To 9,i+1 To 10, =
