[计算机类试卷]VB笔试模拟试卷94及答案与解析.doc

1、VB 笔试模拟试卷 94 及答案与解析 1 数据结构中，通常采用两种方法衡量算法的时间复杂性，即 _。 （ A）最大时间复杂性和最小时间复杂性 （ B）最好时间复杂性和最坏时间复杂性 （ C）部分时间复杂性和总体时间复杂性 （ D）平均时间复杂性和最坏时间复杂性 2 对于顺序存储的队列，存储空间大小为 n，头指针为 F，尾指针为 R。若在逻辑上看成一个环，则队列中元素的个数为 _。 （ A） R-F （ B） n+ R-P （ C） (R-F+1)mod n （ D） (n+ R F)mod n 3 在长度为 n的顺序表的第 i(1in+1)个位置上插入一个元素，元素的移动次数为_。 （ A）

2、 n-i+1 （ B） n-i （ C） i （ D） i-1 4 若某完全二叉树的深度为 h，则该完全二叉树中至少有 _个结点。 （ A） 2h （ B） 2h-1 （ C） 2h-1-1 （ D） 2h-1+1 5 某二叉树的中序序列和后序序列正好相反，则该二叉树一定是 _ 的二叉树。 （ A）空或只有一个结点 （ B）高度等于其结点数 （ C）任一结点无左孩子 （ D）任一结点无右孩子 6 软件文档是软件工程实施中的重要部分，它不仅是软件开发各阶段的重要依据，而且影响软件的 _。 （ A）可理解性 （ B）可维护性 （ C）可扩展性 （ D）可移植性 7 程序的三种基本控制结构的共同特点

3、是 _。 （ A）不能嵌套使用 （ B）只能用来写简单程序 （ C）已经用硬件实现 （ D）只有一个入口和一个出口 8 数据库管理系统 DBMS中用来定义模式、内模式和外模式的语言是 _。 （ A） DML （ B） C （ C） DDL （ D） Pascal 9 一个教师能开多门课程，一门课程有许多教师会开，实体课程与实体教师间是_。 （ A）一对一的联系 （ B）一对多的联系 （ C）多对多的联系 （ D）多对一的联系 10 设 R和 S为二个关系， _中的符号分别代表选择、投影、笛卡儿积的关系代数运算。 （ A） F(R)， A(R)、 RS （ B） EA(R)、 VA(S)、 R*

4、S （ C） RS、 R S、 RS （ D） A(R)， F(R)、 RS 11 不能触发滚动条 (如图所示 )Change事件的操作是 _。（ A）拖动滚动块 （ B）单击两端箭头 （ C）单击滚动块 （ D）单击箭头与滚动块之间的滚动条 12 设置命令按钮的标题文字时，应改变的属性是 _。 （ A） text （ B） Name （ C） Caption （ D） (名称 ) 13 可决定窗体的左上角是否有控制菜单的属性是 _。 （ A） ControlBox （ B） MinButton （ C） MaxButton （ D） BorderStyle 14 若要获得滚动条的当前值，可访

5、问的属性是 _。 （ A） Text （ B） Value （ C） Max （ D） Min 15 使图形能自动按控件大小而改变的控件是 _。 （ A） 图片框 （ B）图象框 （ C）标签框 （ D）框架 16 若要设置文本框中所显示的文本颜色，使用的属性是 _。 （ A） BackColor （ B） FillColor （ C） ForeColor （ D） BackStyle 17 若要将窗体从内存中卸载出去，应该使用的方法是 _。 （ A） Show （ B） UnLoad （ C） Load （ D） Hide 18 以下是 MDI子窗体在运行时特性的叙述，错误的是 _。 （ A

6、）子窗体在 MDI窗体的内部区域显示 （ B）子窗体可在 MDI窗体的外部区域显示 （ C）当子窗体最小化时，它的国标在 MDI窗体内显示 （ D）当子窗体最大化时，其标题与 MDI窗体标题合并，并显示在 MDI窗体的标题栏中 19 有如下程序 For i=1 To 3 For j=5 To 1 Step -1 Print i+ j Next j, I其循环执行的次数为： _。 （ A） 12 （ B） 13 （ C） 14 （ D） 15 20 以下程序输出的结果为 _。 x=1 y=4 Do Until y 4 x=x*y y=y + 1 Loop Print x （ A） 4 （ B）

7、8 （ C） 12 （ D） 16 21 在窗体上添加一个按纽，名为 command1，然后编写如下的事件过程：_。 Private Sub Command1_Click() For i=1 To 4 x= 4 For j=1 To 3 x= 3 For k=1 To 2 x=x + 5 Next k Next j Next i Print x End Sub （ A） 13 （ B） 26 （ C） 30 （ D） 40 22 下列程序段的执行结果为 _。 Dim A(3， 3) For M=1 To 3 For N=1 To 3 If N=M 0r N=3-M+1 Then A(M， N)

8、=1 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)； Next N Print Next M （ A） 1 0 0 0 1 a 0 0 1 （ B） 1 1 1 1 1 1 1 1 1 （ C） 0 0 0 0 0 0 0 0 0 （ D） 1 0 1 0 1 0 1 0 1 23 以下语句正确的是： _。 （ A） Select Case a Case b=1 Case “B” b=2 Case Else b=3 End Select （ B） Select Case a Case “A”

9、 b=1 Case “B” b=2 Case Default b=3 End Select （ C） Switch a Case “A” b=1 Case “B” b=2 Case Else b=3 End Switch （ D） Switch a Case “A” b=1 Case “B” b=2 Case Default b=3 End Select 24 单击命令按钮时，下列程序代码的执行结果为 _。 Private Function FirProc (x As Integer， y As Integer， z As Integer) FirProc=2*x+y+3*z End Func

10、tion Private Function SecProc(x As Integer， y As Integer， z As Integer) SecProc=FirProc(z， x， y)+x End Function Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim C As Integer a=2 b = 3 c = 4 Print SecProc(c， b， A) End Sub （ A） 21 （ B） 19 （ C） 17 （ D） 34 25 以下程序段执行后整型变量度 n的值为 _。 n=0

11、for I=l to 20 step 5 n=n+1 next I （ A） 50 （ B） 4 （ C） 15 （ D） 210 26 Datetime是 Data类型 的变量，以下赋值语句中错误的是： _。 （ A） Datetime=# 4/14/97# （ B） Datetime=# September 1， 1997# （ C） Datetime=#12:15:00 AM# （ D） Datetime=“8/8/99” 27 下列程序段的执行结果为 _。 x=Int (Rnd+4) Select Case x Case 5 Print“优秀 ” Case 4 Print“良好 ” C

12、ase 3 Print“通过 ” Case Else Print“没有通过 ” End Select （ A） 优秀 （ B）良好 （ C）通过 （ D）没有通过 28 可以用 InputBox 函数产生 “输入对话框 ”。若执行下列语句时， st =InputBox (“请输入字符串 ”， “字符串对话框 ”， “字符串 ”)当用户输入完毕，按 OK按钮后， st变量的内容是 _。 （ A）字符串 （ B）请输入字符串 （ C）字符串对话框 （ D）用户输入的内容 29 VB的工程资源管理器可管理多种类型的文件，下面叙述正确的是 _。 （ A）窗体文件的扩展名为 frm，每个窗体对应一个窗体

13、文件 （ B）标准模块必须属于某一个窗体 （ C）用户通过类模块来定义自己的类，每个类都可用多个文件来保存，其扩展名为 .bat （ D）资源文件是一种纯文本文件，可以用简单的文字编辑器来编辑 30 若要将某命令按钮设置为默认命令按钮。则应设置为 True的属性是 _。 （ A） Value （ B） Cancel （ C） Default （ D） Enabled 31 以下程序段中 Do.Loop循环执行的次数为 _。 n=5 Do if n mod 2=0 then n=n2 else n=n*3+1 end if Loop until n=1 （ A） 4 （ B） 3 （ C） 5

14、（ D） 2 32 在窗体上添加一命令按纽，其名为 Command1，然后编写代码如下： Private Sub Command1_Click() Dim arr (5)As Integer Dim arrl (5)As Integer n=3 For i=1 To 5 Arr (i)=i Arrl (n)=2*n+ i Next i Print arrl (n)； arr (n) End Sub 程序的运行结果为： _。 （ A） 3 11 （ B） 11 3 （ C） 13 3 （ D） 3 13 33 在窗体上有一名为 list1的列表框和名为 Command1的命令按钮，要求程序运行后

15、；如果单击命令按钮，则把列表框中所有的列表项目写到顺序文件 list.txt 中。下列能完成该操作的程序是 _。 （ A） Private Sub Command1_Click() Open “c:list.txt”For Input As #1 For i=0 To Listl.ListCount-1 Print #1， List1.List(i) Next i Close #1 End Sub （ B） Private Sub Command1_lick() Open “c:list.txt”For Output As #1 For i=0 To List1.ListCount Print

16、 #1， List1.List(i) Next i Close #1 End Sub （ C） Private Sub Command1_Click() Open “c:list.txt”For Output As #1 For i=0 To List1.ListCount -1 Print #1， List1. List(i) Next i C1ese #1 End Sub （ D） Private Sub Command1_Click() Open “c:list.txt”For As #1 For i=0 To List1.ListCount Print #1， List1.List(i

17、) Next i Close #1 End Sub 34 有如下一个 Sub过程： Sub mlt (ParamArray numbers() n=1 For Each x In numbers n=n * x Next x Print n End Sub在一个事件过程中如下调用该 Sub过程： Private Sub Coinmand1_Click() Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer a=1 b=2 c=3 d=4 mlt a， b， c，d End Sub 则运行该程序，结果为 _。 （

18、 A） 12 （ B） 24 （ C） 36 （ D） 48 35 有如下函数过程： Function gys(ByVal x As Integer， ByVal y As Integer) As Integer Do While y 0 reminder = x Mod y x=y y=reminder Loop gys=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 _。 Private Sub Command7_Click() Dim s As Integer Dim b As Integer a=100 b=25 x=gys(a， B)Print x En

19、d Sub （ A） 0 （ B） 25 （ C） 50 （ D） 100 36 某二叉树的先根遍历序列为 CEDBA，中根遍历序列为 DEBAC，则其后根遍历序列为【 】。 37 若进栈序列为 a， b， c，则通过入出栈操作可能得到的 a， b， c的不同排列个数为 【 】。 38 若二叉树中度为 2的结点有 15个，度为 1的结点有 10个，则有【 】个叶结点。 39 结构化方式由结构化分析、结构化设计和【 】构成，它是一种面向数据流的开发方法。 40 DBMS的数据控制功能包括完整性控制、并发控制、安全性控制和【 】。 41 下面程序段的输出结果是【 】。 p = 0 s = 0 Do

20、 p = p + 2 s = s + p Loop While p 11 Print “s=”; s 42 下面 程序段的输出结果是【 】。 For X=1.5 To 5 Step 1.5 Print X； Next X 43 以下程序段的作用是首先按降序输入 10个数到数组 Y的前 10个元素中，又输入一个 YO插入到数组 Y中，插入 YO后 Y中的数据仍按降序排列。请补充完该程序 _。 Dim Y(1 To 11) For i =1 To 10 Y(i) = Val(InputBox(“请输入 Y(i)： ”) Next i X = Val(InputBox (“请输入 x： ”) For

21、 i = 10 To 1 Step -1 If【 】 Then Y(i + 1) = X Exit For End If Y (i + 1) =Y(i) Next i Print Y(10) For i =1 To 11 Print Y(i) Next I 44 有如下过程： Sub SS(ByVal X， ByRef Y， Z) X=X + 1 Y=Y + 1 Z=Z + 1 End Sub 执行该过程的事件过程如下： Private Sub Command1_Click() A = 1 B = 2 C = 3 Call SS(A， B， C) Print A； B； C End Sub 则

22、该程序的执行结果是【 】 。 45 在 Visual Basic 中按文件的访问方式不同，可以将文件分为顺序文件，随机文件和【 】。 46 以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。Private Sub Command1_Click() Dim A(3， 3) For M=1 To 3 For N=1 To 3 If N=M Or【 】 Then A(M， N)=1 Else 【 】 =0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M， N)； Next N Print Next M End Sub

23、 47 以下程序段中 Do.Loop 循环执行的次数为【 】。程序执行完毕后， n的值为【 】。 Private Sub Command1_Click() n =5 Do If n Mod 2= 0 Then n =n 2 Else n =n* 3 + 1 End If Loop Until n=1 End Sub 48 在 Visual Basic 中，要将一个窗体装载到内存进行预处理，但不显示，应该使用【 】语句，要将一个窗体从内存中释放，应使用【 】语句。 49 下列程序的作用是求所有小于或等于 30的自然数对。该程序不完整，请补充完该程序 (程序执行结果见下图 )。 注：自然数对是指两

24、个自然数的和与差都是平方数(如 8与 17)。 Private Sub Command1_Click() Dim n As Long Dim m As Long Dim s As Single Dim d As String For n=1 To 30 For m=1 To【 】 s =n+ m 【 】 If Sqr (s)=Int(Sqr(s)【 】 Sqr(D)=Int(Sqr(D)Then Print n： m End lf Next m Next n End Sub 50 以下程序用于求 s=1+(1+2)+(1+2+3)+(1+2+100) 的和，请补充完该程序。 Dim n As

25、Integer Dim i As Integer Dim j As Long Dim s As Long n=100 j=0 s=0 For i=1 To【 】 J=【 】 s=【 】 Next i Print s VB 笔试模拟试卷 94 答案与解析 1 【正确答案】 D 2 【正确答案】 A 3 【正确答案】 A 4 【正确答案】 B 5 【正确答案】 C 6 【正确答案】 B 7 【正确答案】 D 8 【正确答案】 C 9 【正确答案】 C 10 【正确答案】 A 11 【正确答案】 C 12 【正确答 案】 C 13 【正确答案】 A 14 【正确答案】 B 15 【正确答案】 B 1

26、6 【正确答案】 C 17 【正确答案】 B 18 【正确答案】 D 19 【正确答案】 D 20 【正确答案】 A 21 【正确答案】 A 22 【正确答案】 D 23 【正确答案】 A 24 【正确答案】 A 25 【正确答案】 B 26 【正确答案】 D 27 【正确答案】 B 28 【正确答案】 D 29 【正确答案】 B 30 【正确答案】 C 31 【正确答案】 C 32 【正确答案】 B 33 【正确答案】 C 34 【正确答案】 B 35 【正确答案】 B 36 【正确答案】 DADEC 37 【正确答案】 5 38 【正确答案】 16 39 【正确答案】 结构化程序设计 40 【正确答案】 故障恢复 41 【正确答案】 s=42 42 【正确答案】 1.5 3 4.5 43 【正确答案】 X Y(i) 44 【正确答案】 1 3 4 45 【正确答案】 二进制文件 46 【正确答案】 N=3-M+1, A(M， N) 47 【正确答案】 5 , 1 48 【正确答案】 load , unload 49 【正确答案】 n,d=n-m ,And 50 【正确答案】 n, j+ I, s+ j