2011-2019年全国计算机二级VB考试真题及答案
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"
    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小时内删除。