2014年3月全国计算机二级VB选择题第2套

1.设某二叉树的后序序列为CBA，中序序列为ABC，则该二叉树的前序序列为

A.BCA

B.CBA

C.ABC

D.CAB

2.下列叙述中正确的是

A.存储空间不连续的所有链表一定是非线性结构

B.结点中有多个指针域的所有链表一定是非线性结构

C.能顺序存储的数据结构一定是线性结构

D.带链的栈与队列是线性结构

3.算法时间复杂度的度量方法是

A.算法程序的长度

B.执行算法所需要的基本运算次数

C.执行算法所需要的所有运算次数

D.执行算法所需要的时间

4.设循环队列为Q(1: m)，初始状态为front=rear=m。现经过一系列的入队与退队运算后，front=rear=1，则该循环队列中的元素个数为

A.1

B.2

C.m-1

D.0或m

5.计算机软件的构成是

A.源代码

B.程序和数据

C.程序和文档

D.程序、数据及相关文档

6.下面不属于软件设计阶段任务的是

A.软件的详细设计

B.软件的总体结构设计

C.软件的需求分析

D.软件的数据设计

7.下面属于黑盒测试方法的是

A.边界值分析法

B.基本路径测试

C.条件覆盖

D.条件-分支覆盖

8.一名雇员就职于一家公司，一个公司有多个雇员。则实体公司和实体雇员之间的联系是

A.1:1联系

B.1:m联系

C.m:1联系

D.m:n联系

9.有关系R如下，其中属性B为主键：

B

C

D

a

0

k1

b

1

n1

2

p1

则其中最后一个记录违反了

A.实体完整性约束

B.参照完整性约束

C.用户定义的完整性约束

D.关系完整性约束

10.在数据库系统中，用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是

A.概念数据模型

B.逻辑数据模型

C.物理数据模型

D.关系数据模型

11.以下合法的VB变量名是

A.x_y

B.Print

C._b

D.m-n

12.以下关于VB的叙述中，错误的是

A.VB的窗体模块只包含由控件组成的窗体

B.在VB集成开发环境中，既可以运行程序，也可以调试程序

C.VB采用事件驱动的编程机制

D.VB程序可以编译为.exe文件

13.VB工程文件的扩展名是

A..vbp

B..frm

C..vbg

D..bas

14.设有数组声明语句如下：

Dim a(-1 to 2, ,0 to 5)

a所包含的数组元素个数是

A.24

B.20

C.18

D.15

15.能够被窗体或控件所识别的操作称为

A.事件

B.方法

C.过程

D.属性

16. 函数表达式Sgn(-10)的值是

A.-1

B.0

C.1

D.10

17.设：a = 3，b = 5，c = 4，d = 7，表达式 a <= b And (a > d) Or Not( b < c)的值是

A.True

B.False

C.0

D.1

18.设有表达式：A=IIf(x > y, "go", "back")。以下与该表达式具有相同功能的语句是

If y < x Then

A = "go"

Else

A = "back"

End If

If x >= y Then

A = "go"

Else

A = "back"

End If

If y < x Then

A = "back"

Else

A = "go"

End If

If y<=x Then

A = "back"

Else

A = "go"

End If

19.设一个工程文件包含多个窗体及标准模块，以下叙述中错误的是

A.如果工程中有Sub Main过程，则程序一定首先执行该过程

B.不能把标准模块设置为启动模块

C.用Hide方法只是隐藏窗体，不能从内存中清除该窗体

D.Show方法用于显示一个窗体

20.以下关于文件的叙述中，正确的是

A.随机文件的记录是定长的

B.用Append方式打开的文件，既可以进行读操作，也可以进行写操作

C.随机文件记录中的各个字段具有相同的长度

D.随机文件通常比顺序文件占用的空间小

21.使用Cls方法能够清除窗体或图片框中

A.在运行阶段输出的文字

B.在设计阶段放置的控件

C.在设计阶段通过Picture属性装入的图片

D.以上均可

22.以下关于文本框的叙述中，正确的是

A.当Enabled属性为False时，其Tab顺序不起作用

B.当TabStop属性为False时，不能接收从键盘输入的数据

C.当获得焦点时，触发LostFocus事件

D.若PassWord属性设为"a"，则输入到文本框的字符将显示为"*"

23.以下不能作为容器使用的控件是

A.图像框

B.框架

C.图片框

D.窗体

24.以下关于窗体的叙述中，错误的是

A.执行Unload Form1语句后，窗体Form1被隐藏，但仍在内存中

B.当窗体的Enabled属性为False时，窗体不响应鼠标、键盘的操作

C.当窗体的KeyPreview属性为True时，则窗体能优先响应键盘事件

D.窗体的Load事件在加载窗体时触发

25.如果要使命令按钮呈现图形外观，应设置的属性是

A.Style属性和Picture属性

B.Style属性和Graphics属性

C.Graphics属性

D.Caption属性

26.以下关于列表框控件的叙述中，错误的是

A.列表框中的表项每次只能选择一项

B.若把Sorted属性设置为True，则表项按升序排列

C.ListCount属性指明列表框中表项的数量

D.AddItem方法能够把列表项添加到列表框指定位置

27.以下关于垂直滚动条的叙述中，正确的是

A.单击滚动条的箭头时，Value属性值的变化量是SmallChange属性的值

B.当Value属性值等于Max属性值时，滚动块位于滚动条的底部

C.拖动滚动块的过程中，触发Change事件而不触发Scroll事件

D.Min、Max不能设置为负值

28. 窗体的MouseDown事件过程代码如下：

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button And 2 Then

PopupMenu mnu

End If

End Sub

对于以上程序，以下叙述中错误的是

A.X、Y是鼠标按下时的坐标

B.PopupMenu是窗体的事件

C.mnu是在菜单编辑器中定义的菜单项

D.条件语句有错

29. 窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，其事件过程如下：

Private Sub Command1_Click()

CD1.Filter = "All File|*.*|Word|*.Doc|*.exe|*.exe"

CD1.FilterIndex = 2

CD1.DialogTitle = "Open File"

CD1.FileName = "E:\Test.doc"

CD1.InitDir = "E:\"

CD1.ShowOpen

End Sub

对于以上程序，以下叙述中错误的是

A.程序的功能是打开文件名为E:\Test.doc的文件

B.CD1被激活为"打开"文件对话框

C.对话框的标题是"Open File"

D.打开对话框时的默认文件类型是.Doc文件

30.以下关于使用菜单编辑器设计菜单的叙述中错误的是

A.若菜单项的"可见"选项被标记为"√"，该菜单项不显示在菜单中

B.若菜单项的"有效"选项未标记为"√"，该菜单项显示为灰色

C.菜单中各菜单项可以是控件数组元素

D.菜单项中的分隔条也必须有唯一的名称

31. 窗体的单击事件过程如下：

Private Sub Form_Click()

x = InputBox("Input X:")

Select Case Sgn(x)

Case -1

Print "y="; x * Sgn(x)

Case 0

Print "y="; Sgn(x) * 5

Case 1

Print "y="; x * Sgn(x) + 1

Case Else

Print "y="; 10

End Select

End Sub

运行程序时，单击窗体，以下叙述中错误的是

A.当输入值为2时，输出为y=10

B.当输入值为-1时，输出为y=1

C.当输入值为0时，输出为y=0

D.当输入值为1时，输出为y=2

32. 窗体的单击事件过程如下：

Private Sub Form_Click()

K = 1

For i = 5 To 1 Step -1

T = T * 10 + K

S = S + T

Next i

Print S

End Sub

运行程序时，单击窗体后，显示的是

A.12345

B.54321

C.0

D.11111

33. 窗体的单击事件过程代码如下：

Private Sub Form_Click()

Dim a(5, 5) As Integer

For i = 1 To 5

For j = 1 To 5

a(i, j) = i + j

Print a(i, j);

Next j

Next i

End Sub

运行程序，单击窗体后，窗体上显示的是

2 3 4 5 6

3 4 5 6 7

4 5 6 7 8

5 6 7 8 9

6 7 8 9 10

1 2 3 4 5

2 3 4 5 6

3 4 5 6 7

4 5 6 7 8

5 6 7 8 9

3 4 5 6 7

4 5 6 7 8

5 6 7 8 9

6 7 8 9 10

7 8 9 10 11

2 3 4 5 6

34. 窗体上有名称为Command1的命令按钮，程序代码如下：

Dim x As Integer, y As Integer, z As Integer

Sub p(a As Integer, ByVal b As Integer)

Dim c As Integer

a = a * 2

b = b + 2

z = a + b

End Sub

Private Sub Form_Click()

x = 4: y = 5: z = 6

Call p(x, y)

Print x, y, z

End Sub

运行程序，单击命令按钮后，窗体上显示的是

A.8 5 15

B.4 5 6

C.4 5 15

D.8 10 15

35.程序代码如下：

Option Base 1

Private Sub Form_Click()

Dim a(5, 5) As Integer

Randomize

For i = 1 To 5

For j = 1 To 5

If i = j Then

a(i, j) = 1

Else

a(i, j) = Int(Rnd * 50)

End If

Print a(i, j);

Next j

Next i

End Sub

以下关于上述程序的叙述中，错误的是

A.程序为数组a的所有元素赋了随机值

B.Randomize的作用是避免同一序列随机数的反复出现

C.程序产生随机数的范围是大于等于0，小于50

D.输出结果组成的方阵中对角线上的值为1

36. 窗体上有一个名称为Combo1的组合框。在组合框的文本输入区输入字符串并按回车后，检查该字符串是否在组合框中已存在。若不存在，则将其添加到组合框中。相关的事件过程如下：

Private Sub Combo1_KeyPress(KeyAscii As Integer)

Dim flag As Boolean

If KeyAscii = 13 Then

flag = False

For i = 0 To Combo1.ListCount - 1

If Combo1.Text = Combo1.List(i) Then

flag = True

Exit For

End If

Next i

If flag = False Then

Combo1.AddItem Combo1.Text

End If

End Sub

对于上述事件过程，以下叙述中错误的是

A.程序有错，不应该使用Exit For

B.flag为True时，表明输入的字符串已存在

C.参数KeyAscii表示输入字符的ASCII码

D.flag = False的含义是组合框中没有与输入字符串相同的表项

37.窗体上有一个名称为Text1的文本框，名称为Check1的两个复选框构成的控件数组，下标分别为1、2。窗体外观如图所示。

要求在程序运行时，改变复选框选中状态，则文本框中文本的字体做相应变化。为此，某人编写了如下程序代码：

Private Sub Check1_Click(Index As Integer)

If Index=1 And Check1(1).Value then

Text1.FontItalic=True

Else

Text1.FontItalic=False

End If

If Check1(2).value=1 then

Text1.FontBold=True

End If

If Check1(2).value=0 Then

Text1.FontBold=False

End If

End Sub

但是，以上程序在运行中不能完全达到要求，应进行修改，下面正确的修改是

A.将If Index=1 And Check1(1).Value Then 改为If Check1(1).Value Then

B.将第1个If条件中的Check1(1).Value 改为Check1(1).Value =True

C.将第2个If条件中的Check1(2).Value=1 改为Check1(2).Value =True

D.将第3个If条件中的Check1(2).Value=0改为Check1(2).Value= False

38.工程文件包含Form1、Form2两个窗体。Form1有包含二个菜单命令的菜单；Form2上有一个名称为Command1的命令按钮，如图所示。

Form1中菜单项"隐藏Form1"的单击事件过程代码如下：

Private Sub hideF1_Click()

Form1.Hide

End Sub

Form1中菜单项"显示Form2"的单击事件过程代码如下：

Private Sub showF2_Click()

Form2.Show

End Sub

Form2的程序代码如下：

Private Sub Command1_Click()

Form1.Show

End Sub

以下关于上述程序的叙述中，正确的是

A.Form1中定义的菜单只出现在Form1

B.执行Form2的命令按钮单击事件过程，显示Form1的同时隐藏Form2

C.Form1的2个菜单命令都能隐藏Form1

D.执行"隐藏Form1"菜单命令会出错，因为没有窗体被打开

39.编写程序，要求输入一个正整数，计算各位数字之和，并将计算结果显示在窗体上。程序如下：

Private Sub Command1_Click()

Dim Sum As Integer, k As Long

k = Val(InputBox("输入正整数："))

Do While k > 0

Sum = Sum + ( __________ )

k = k \ 10

Loop

Print Sum

End Sub

程序不完整，应该在_______ 处填写的内容是

A.k Mod 10

B.k

C.left(CStr(k), 1

D.mid (CStr(k), 1，1)

40.窗体上有一个名称为Command1的命令按钮，一个名称为List1的列表框。命令按钮的单击事件过程如下：

Private Sub Command1_Click()

Open "c:\f1.txt" For Input As #1

Do While Not EOF(1)

Input #1, str1

List1.AddItem str1

Loop

End Sub

对于上述程序，以下叙述中错误的是

A.以输入方式打开随机文件f1.txt

B.Close的作用是关闭已经打开的数据文件

C.单击命令按钮后，把f1.txt中的所有内容添加到列表框中

D.运行程序后，列表框中的列表项都是f1.txt中的记录

1.C 2.D 3.B 4.D 5.D 6.C 7.A 8.B 9.A 10.A 11.A 12.A 13.A 14.A 15.A 16.A 17.A 18.A 19.A 20.A 21.A 22.A 23.A 24.A 25.A 26.A 27.A 28.B 29.A 30.A 31.A 32.A 33.A 34.A 35.A 36.A 37.A 38.A 39.A 40.A