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）某系统总体结构图如下图所示：XY系统功能1功能2 功能3功能2.1功能2.2 功能2.3该系统总体结构图的深度是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 TA B C A B C A B Ca 1 2 a 1 2 c 3 1b 2 1 b 2 1c 3 1则由关系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 = aDo Until a >=5x = a * bPrint b; xa = a + bb = b + aLoopEnd Sub程序运行后，单击窗体，输出结果是A） 1 1 B） 1 1 C） 1 1 D） 1 12 3 2 4 3 8 3 6（18）在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。

当单击列表框中的某个城市名时，该城市名消失。

下列在List_Click事件过程中能正确实现上述功能的语句是A）List1.RemoveItem List1.Text B）List1.RemoveItem List1.ClearC）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 Integers = 0x = 0Do While s = 10000x = x + 1s = s + x ^ 2LoopPrint sEnd Sub上述程序的功能是：计算s=1+22+32+…+n2+…，直到s>10000为止。

程序运行后，发现得不到正确的结果，必须进行修改。

下列修改中正确的是A）把x = 0改为x = 1B）把Do While s = 10000改为Do While s <= 10000C）把Do While s = 10000改为Do While s > 10000D）交换x = x + 1和s = s + x ^ 2的位置（21）设有如下程序：Private Sub Form_Click()Dim s As Long, f As LongDim n As Integer, i As Integerf = 1n = 4For i = 1 To nf = f * is = s + fNext iPrint sEnd Sub程序运行后，单击窗体，输出结果是A）32 B）33 C）34 D）35（22）阅读下面的程序段：a = 0For i = 1 To 3For j = 1 To iFor k = j To 3a = a + 1Next kNext jNext i执行上面的程序段后，a的值为A）3 B）9 C）14 D）21（23）设有如下程序：Private Sub Form_Click()Clsa$ = "123456"For i = 1 To 6Print Tab(12 - i);Next iEnd 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 Stringx = "ABCDEFG"For i = 4 To 1 Step -1y = Mid(x, i, i) + yNext iPrint yEnd Sub程序运行后，单击窗体，输出结果是A）ABCCDEDEFG B）AABBCDEFGC）ABCDEFG D）AABBCCDDEEFFGG（25）设有如下程序：Private Sub Form_Click()Dim ary(1 To 5) As IntegerDim i As IntegerDim sum As IntegerFor i = 1 To 5ary(i) = i + 1sum = sum + ary(i)Next iPrint sumEnd 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 IntegerDim c As Integer, d As Integera = 0:b = 1:c = 1d = a + b + ci = 5While d <= 1000Print d;a = b:b = c:c = dd = a + b + ci = i + 1WendEnd Sub运行上面的程序，发现输出的数列不完整，应进行修改。

以下正确的修改是A）把While d <= 1000改为While d > 1000B）把i = 5改为i = 4C）把i = i + 1移到While d <= 1000的下面D）在i = 5的上面增加一个语句：Print a; b; c;（27）下面的语句用Array函数为数组变量a的各元素赋整数值：a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)针对a的声明语句应该是A）Dim a B）Dim a As IntegerC）Dim a(9) As Integer D）Dim a() As Integer（28）下列描述中正确的是A）Visual Basic只能通过过程调用执行通用过程B）可以在Sub过程的代码中包含另一个Sub过程的代码C）可以像通用过程一样指定事件过程的名字D）Sub过程和Function过程都有返回值（29）阅读程序：Function fac(ByVal n As Integer) As IntegerDim temp As Integertemp = 1For i% = 1 To ntemp = temp * i%Next i%fac = tempEnd FunctionPrivate Sub Form_Click()Dim nsum As Integernsum = 1For i% = 2 To 4nsum = nsum + fac(i%)Next i%Print nsumEnd Sub程序运行后，单击窗体，输出结果是A）35 B）31 C）33 D）37（30）在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码：Sub S(x As Integer, y As Integer)Static z As Integery = x * x + zz = yEnd SubPrivate Sub Command1_Click()Dim i As Integer, z As Integerm = 0z = 0For i = 1 To 3S( i, z)m = m + zNext iLabel1.Caption = Str(m)End Sub程序运行后，单击命令按钮，在标签中显示的内容是A）50 B）20 C）14 D）7（31）以下说法中正确的是A）MouseUp事件是鼠标向上移动时触发的事件B）MouseUp事件过程中的x，y参数用于修改鼠标位置C）在MouseUp事件过程中可以判断用户是否使用了组合键D）在MouseUp事件过程中不能判断鼠标的位置（32）假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单项的名称为a1，其“可见”属性为False。