2011年9月全国计算机等级考试二级VB笔试试卷及参考答案
2011年 9月全国计算机等级考试二级笔试试卷
Visual Basic语言程序设计
（考试时间90 分钟，满分100分）
一、选择题（每小题2分，共70分）
下列各题A） 、B） 、C） 、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是（ ） 。
A）算法就是程序 B）设计算法时只需要考虑数据结构的设计
C）设计算法时只需要考虑结果的可靠性 D）以上三种说法都不对
（2）下列关于线性链表的叙述中，正确的是
A）各数据结点的存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致
B）各数据结点的存储顺序与逻辑顺序可以不一致，但它们的存储空间必须连续
C）进行插入与删除时，不需要移动表中的元素
D）以上三种说法都不对
（3）下列关于二叉树的叙述中，正确的是
A）叶子结点总是比度为2的结点少一个 B）叶子结点总是比度为2的结点多一个
C）叶子结点数是度为2的结点数的两倍 D）度为2的结点数是度为1的结点数的两倍
（4）软件按功能可以分为应用软件、系统软件和支撑软件（或工具软件）。下面属于应用软件的是
A）学生成绩管理系统 B）C语言编译程序
C）UNIX操作系统 D）数据库管理系统
（5）某系统总体结构图如下图所示：
该系统总体结构图的深度是
A）7 B）6 C）3 D）2
（6）程序调试的任务是
A）设计测试用例 B）验证程序的正确性
C）发现程序中的错误 D）诊断和改正程序中的错误
（7）下列关于数据库设计的叙述中，正确的是
A）在需求分析阶段建立数据字典 B）在概念设计阶段建立数据字典
C）在逻辑设计阶段建立数据字典 D）在物理设计阶段建立数据字典
（8）数据库系统的三级模式不包括
A）概念模式 B）内模式 C）外模式 D）数据模式
（9）有三个关系R、S和T如下：
则由关系R和S得到关系T的操作是
A）自然连接 B）差 C）交 D）并
（10）下列选项中属于面向对象设计方法主要特征的是
A）继承 B）自顶向下 C）模块化 D）逐步求精
（11）以下描述中错误的是
A）窗体的标题通过其Caption属性设置
B）窗体的名称（Name属性）可以在运行期间修改
C）窗体的背景图形通过其Picture属性设置
D）窗体最小化时的图标通过其Icon属性设置
（12）在设计阶段，当按Ctrl+R键时，所打开的窗口是
A）代码窗口 B）工具箱窗口
C） 工程资源管理器窗口 D）属性窗口
（13）设有如下变量声明语句：
Dim a, b As Boolean
则下面叙述中正确的是
A）a和b都是布尔型变量 B）a是变体型变量，b是布尔型变量
C）a是整型变量，b是布尔型变量 D）a和b都是变体型变量
（14）下列可以作为Visual Basic变量名的是
A）A#A B）4ABC C）?xy D）Print_Text
（15）假定一个滚动条的LargeChange属性值为100，则100表示
A）单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量
B）滚动框位置的最大值
C）拖动滚动框时滚动框位置的变化量
D）单击滚动条箭头时滚动框位置的变化量
（16）在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
MsgBox Str(123 + 321)
End Sub
程序运行后，单击命令按钮，则在信息框中显示的提示信息为
A）字符串“123+321” B）字符串“444” C）数值“444” D）空白
（17）假定有以下程序：
Private Sub Form_Click()
a = 1: b = a
Do Until a >= 5
x = a * b
Print b; x
a = a + b
b = b + a
Loop
End Sub
程序运行后，单击窗体，输出结果是
A） 1 1 B） 1 1 C） 1 1 D） 1 1
2 3 2 4 3 8 3 6
（18）在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名消失。下列在List_Click事件过程中能正确实现上述功能的语句是
A）List1.RemoveItem List1.Text B）List1.RemoveItem List1.Clear
C）List1.RemoveItem List1.ListCount D）List1.RemoveItem List1.ListIndex
（19）列表框中的项目保存在一个数组中，这个数组的名字是
A）Column B）Style C）List D）MultiSelect
（20）有人编写了如下的程序：
Private Sub Form_Click()
Dim s As Integer, x As Integer
s = 0
x = 0
Do While s = 10000
x = x + 1
s = s + x ^ 2
Loop
Print s
End Sub
上述程序的功能是：计算s=1+22+32+…+n2+…，直到s>10000为止。程序运行后，发现得不到正确的结果，必须进行修改。下列修改中正确的是
A）把x = 0改为x = 1
B）把Do While s = 10000改为Do While s <= 10000
C）把Do While s = 10000改为Do While s > 10000
D）交换x = x + 1和s = s + x ^ 2的位置
（21）设有如下程序：
Private Sub Form_Click()
Dim s As Long, f As Long
Dim n As Integer, i As Integer
f = 1
n = 4
For i = 1 To n
f = f * i
s = s + f
Next i
Print s
End Sub
程序运行后，单击窗体，输出结果是
A）32 B）33 C）34 D）35
（22）阅读下面的程序段：
a = 0
For i = 1 To 3
For j = 1 To i
For k = j To 3
a = a + 1
Next k
Next j
Next i
执行上面的程序段后，a的值为
A）3 B）9 C）14 D）21
（23）设有如下程序：
Private Sub Form_Click()
Cls
a$ = "123456"
For i = 1 To 6
Print Tab(12 - i);
Next i
End Sub
程序运行后，单击窗体，要求结果如图所示，则在 处应填入的内容为
A）Left(a$, i) B）Mid(a$, 8 - i, i) C）Right(a$, i) D）Mid(a$, 7, i)
（24）设有如下程序：
Private Sub Form_Click()
Dim i As Integer, x As String, y As String
x = "ABCDEFG"basic语言if语句
For i = 4 To 1 Step -1
y = Mid(x, i, i) + y
Next i
Print y
End Sub
程序运行后，单击窗体，输出结果是
A）ABCCDEDEFG B）AABBCDEFG
C）ABCDEFG D）AABBCCDDEEFFGG
（25）设有如下程序：
Private Sub Form_Click()
Dim ary(1 To 5) As Integer
Dim i As Integer
Dim sum As Integer
For i = 1 To 5
ary(i) = i + 1
sum = sum + ary(i)
Next i
Print sum
End Sub
程序运行后，单击窗体，则在窗体上显示的是
A）15 B）16 C）20 D）25
（26）有一个数列，它的前3个数为0，1，1，此后的每个数都是其前面3个数之和，即0，1，1，1，2，4，7，13，24，……
要求编写程序输出该数列中所有不超过1000的数。
某人编写程序如下：
Private Sub Form_Click()
Dim i As Integer, a As Integer, b As Integer
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论