1、计算机等级考试二级 VISUAL+BASIC 分类真题 2014 年 9 月及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.面向对象方法中，实现对象的数据和操作结合于统一体中的是_。（分数：2.50）A.结合B.封装C.隐藏D.抽象2.在进行逻辑设计时，将 E-R 图中实体之间联系转换为关系数据库的_。（分数：2.50）A.关系B.元组C.属性D.属性的值域3.线性表的链式存储结构与顺序存储结构相比，链式存储结构的优点有_。（分数：2.50）A.节省存储空间B.插入与删除运算效率高C.便于查找D.排序时减少元素的比较次数4.深度为 7 的
2、完全二叉树中共有 125 个结点，则该完全二叉树中的叶子结点数为_。（分数：2.50）A.62B.63C.64D.655.下列叙述中正确的是_。（分数：2.50）A.所谓有序表是指在顺序存储空间内连续存放的元素序列B.有序表只能顺序存储在连续的存储空间内C.有序表可以用链接存储方式存储在不连续的存储空间内D.任何存储方式的有序表均能采用二分法进行查找6.设二叉树如下： （分数：2.50）A.ABDEGCFHB.DBGEAFHCC.DGEBHFCAD.ABCDEFGH7.计算机软件包括_。（分数：2.50）A.算法和数据B.程序和数据C.程序和文档D.程序、数据及相关文档8.下面描述中不属于软件
3、需求分析阶段任务的是_。（分数：2.50）A.撰写软件需求规格说明书B.软件的总体结构设计C.软件的需求分析D.软件的需求评审9.当数据库中数据总体逻辑结构发生变化，而应用程序不受影响，称为数据的_。（分数：2.50）A.逻辑独立性B.物理独立性C.应用独立性D.空间独立性10.有三个关系 R、S 和 T 如下： R A B C a 1 2 b 2 1 c 3 1 e 4 2 S A B C d 3 2 c 3 1 T A B C a 1 2 b 2 1 c 3 1 d 3 2 e 4 2 则由关系 R 和 S 得到关系 T 的操作是_。（分数：2.50）A.并B.投影C.交D.选择11.下列
4、合法的 Visual Basic 数值变量是_。（分数：2.50）A.“BianLiang”B.aBCD “B“, 24; Print: Print V; B（分数：2.50）A.VB 24 2 5B.VB 242 5C.V B 242 5D.2 5 242 530.设有函数 （分数：2.50）A.y = IIf(x0, 5, 2)B.y = IIf(x0, 2, 5)C.If x 0 Theny = 2ElseIf x = 0 Theny = 5End IfD.If x0 Theny = 2End IfIf x = 0 Theny = 5End If31.有如下程序代码： Private S
5、ub Form_Click( ) Dim a(3, 3) As Integer For i = 1 To 3 For j = 1 To 3 If j 1 And i 1 Then a(i, j) = a(a(i - 1，j - 1), a(i, j - 1) + 1 Else a(i, j) = i * j End If Print a(i, j); Next j Print Next i End Sub 程序运行后，单击窗体，输出结果为_。 A B C D （分数：2.50）A.B.C.D.32.设有如下程序代码： Private Sub Command1_Click( ) Dim x As
6、 Integer x = 30 Print f(x) + f(x) End Sub Private Function f(a As Integer) As Integer a = a/3 f = a End Function 运行 Command1_Click 过程所产生的输出是_。（分数：2.50）A.13B.20C.30D.633.有如下程序代码： Private Sub Form_Click( ) Dim a(100) As Integer Dim b(100) As Integer For i = 1 To 100 a(i) = i Next i For i = 1 To 100 b(
7、i) = a(i) + a(i - 1) Next i End Sub 运行程序，单击窗体，以下说法中正确的是_。（分数：2.50）A.数组 a 和数组 b 中存放的均为 1100 的整数B.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 101200 的整数C.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 1199 的奇数D.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 1200 的偶数34.有下面程序代码： Private Sub Command1_Click( ) Dim a, s As Integer a = Array(1, 2, 3,
8、4, 5, 6, 7, 8, 9) k = 1 s = 0 Do s = s + a(k) k = k + 2 Loop Until k UBound(A) Print s End Sub 程序运行产生的输出是_。（分数：2.50）A.45B.20C.16D.2535.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Print “ABCD“;
9、Else Print “DDDD“; End If End Sub Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print “EFGH“ End Sub 程序运行后，单击命令按钮，输出结果是_。（分数：2.50）A.ABCDEFGHB.DDDDEFGHC.ABCDD.EFGH36.在窗体上画一个名称为 Command1 的命令按钮，然后编写其 Click 事件过程代码如下： Private Sub Command1_Click( ) Dim i As In
10、teger, num As Integer Do For i = 1 To 10 hum=Int(Rnd * 10) + 1 Select Case num Case 2 Exit For Case 7 Exit Do End Select n = n + 1 Next i Loop Print n End Sub 则下面描述中正确的是_。（分数：2.50）A.当变量 num 的值为 2 时，事件过程 Command1_Click 执行结束B.当变量 num 的值为 7 时，Do 循环将终止C.变量 num 的值一定是大于或等于 11 的整数D.Do 循环的执行次数一定为 10 次37.在窗体
11、上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim x As Integer x = -10 Mod -4 If x = -1 Then Print -1; If x = -2 Then Print -2; If x = -3 Then Print -3; Print End Sub 程序运行时，单击 Command1，则在窗体上输出的结果是_。（分数：2.50）A.-1B.-2C.-1 -2D.-1 -2 -338.假定把计时器控件 Timer1 的 Interval 属性设置为 10，Enabled 属性
12、设置为 True，并编写下面的程序：Dim x As Integer Private Sub Timer1_Timer( ) For i = 1 To 100 x = x+1 Next i Print x End Sub 程序运行一段时间后的结果是_。（分数：2.50）A.输出 100 后正常结束B.输出 1000 后正常结束C.输出 10000 后正常结束D.出错39.设窗体上有一个名称为 Command1 的命令按钮和一个名称为 Timer1 的计时器，并有下面程序代码： Private Sub Form_Load( ) Timer1. Enabled = False Timer1. In
13、terval = 500 End Sub Private Sub Command1_Click( ) Timer1. Enabled = True End Sub Private Sub Timer1_Timer( ) If Command1. Left 0 Then Command1. Left = Command1. Left - 100 End If End Sub 下面叙述中正确的是_。（分数：2.50）A.程序一运行，命令按钮就向左移动，到窗体左端停止B.程序运行后，单击命令按钮，则按钮向左移动，到窗体左端停止C.程序运行后，单击命令按钮，则按钮向左移动，每秒移动一次D.程序一运行，
14、命令按钮就向右移动，到窗体右端停止40.在窗体上画一个名称为 Command1 的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim a As Integer Static b As Integer a = 20 b = 5 Call sub1(a, b) Print a; b End Sub Private Sub sub1(ByRef x1 As Integer, y1 As Integer) x1 = x1 + 3 y1 = x1 + y1 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是_。（分数：2.50）A.23 23B.2
15、3 28C.20 5D.20 25计算机等级考试二级 VISUAL+BASIC 分类真题 2014 年 9 月答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.面向对象方法中，实现对象的数据和操作结合于统一体中的是_。（分数：2.50）A.结合B.封装 C.隐藏D.抽象解析：解析 对象的基本特点是：标识唯一性、分类性、多态性、封装性、模块独立性好。封装是指隐藏对象的属性和实现细节，将数据和操作结合于统一体，仅对外提供访问方式，B 选项正确。2.在进行逻辑设计时，将 E-R 图中实体之间联系转换为关系数据库的_。（分数：2.50）A.关系 B.
16、元组C.属性D.属性的值域解析：解析 E-R 图中实体之间的联系转换为关系数据库中的关系，A 选项正确。3.线性表的链式存储结构与顺序存储结构相比，链式存储结构的优点有_。（分数：2.50）A.节省存储空间B.插入与删除运算效率高 C.便于查找D.排序时减少元素的比较次数解析：解析 顺序表和链表的优缺点比较如下表： 类型 优点 缺 点 顺序表 (1)可以随机存取表中的任意结点 (2)无需为表示结点间的逻辑关系额外增加存储空间 (1)顺序表的插入和删除运算效率很低 (2)顺序表的存储空间不便于扩充 (3)顺序表不便于对存储空间的动态分配 链表 (1)在进行插入和删除运算时，只需要改变指针即可，不
17、需要移动元素 (2)链表的存储空间易于扩充并且方便空间的动态分配 需要额外的空间(指针域)来表示数据元素之间的逻辑关系，存储密度比顺序表低 由表中可以看出链式存储插入与删除运算效率高，故 B 选项正确。4.深度为 7 的完全二叉树中共有 125 个结点，则该完全二叉树中的叶子结点数为_。（分数：2.50）A.62B.63 C.64D.65解析：解析 在树结构中，定义一棵树的根结点所在的层次为 1，其他结点所在的层次等于它的父结点所在的层次加 1，树的最大层次称为树的深度。完全二叉树指除最后一层外，每一层上的结点数均达到最大值，在最后一层上只缺少右边的若干结点。深度为 6 的满二叉树，结点个数为
18、 2 6 -1=63，则第 7 层共有 125-63=62 个叶子结点，分别挂在第 6 层的左边 62 个结点上，加上第 6 层的最后 1 个叶子结点，该完全二叉树共有 63 个叶子结点，故 B 选项正确。5.下列叙述中正确的是_。（分数：2.50）A.所谓有序表是指在顺序存储空间内连续存放的元素序列B.有序表只能顺序存储在连续的存储空间内C.有序表可以用链接存储方式存储在不连续的存储空间内 D.任何存储方式的有序表均能采用二分法进行查找解析：解析 “有序”是特指元素按非递减排列，即从小到大排列，但允许相邻元素相等，A 选项错误。有序表可以顺序存储也可以链式存储，B 选项错。能使用二分法查找的
19、线性表必须满足两个条件：用顺序存储结构；线性表是有序表，D 选项错误。故选择 C 选项。6.设二叉树如下： （分数：2.50）A.ABDEGCFHB.DBGEAFHCC.DGEBHFCA D.ABCDEFGH解析：解析 二叉树遍历可以分为 3 种：前序遍历(访问根结点在访问左子树和访问右子树之前)、中序遍历(访问根结点在访问左子树和访问右子树两者之间)、后序遍历(访问根结点在访问左子树和访问右子树之后)。本题中前序遍历为 ABDEGCFH，中序遍历为 DBGEAFHC，后序遍历为。DGEBHFCA，故 C 选项正确。7.计算机软件包括_。（分数：2.50）A.算法和数据B.程序和数据C.程序和
20、文档D.程序、数据及相关文档 解析：解析 计算机软件由两部分组成：一是机器可执行的程序和数据；二是机器不可执行的，与软件开发、运行、维护、使用等有关的文档。故 D 选项正确。8.下面描述中不属于软件需求分析阶段任务的是_。（分数：2.50）A.撰写软件需求规格说明书B.软件的总体结构设计 C.软件的需求分析D.软件的需求评审解析：解析 需求分析阶段的工作可以分为 4 个方面：需求获取、需求分析、编写需求规格说明书和需求评审。故 B 选项正确。9.当数据库中数据总体逻辑结构发生变化，而应用程序不受影响，称为数据的_。（分数：2.50）A.逻辑独立性 B.物理独立性C.应用独立性D.空间独立性解析
21、：解析 数据独立性包括物理独立性和逻辑独立性，物理独立性指数据的物理结构的改变，不会影响数据库的逻辑结构，也不会引起应用程序的改动；逻辑独立性指数据库的总体逻辑结构的改变，不会导致相应的应用程序的改变。故 A 选项正确。10.有三个关系 R、S 和 T 如下： R A B C a 1 2 b 2 1 c 3 1 e 4 2 S A B C d 3 2 c 3 1 T A B C a 1 2 b 2 1 c 3 1 d 3 2 e 4 2 则由关系 R 和 S 得到关系 T 的操作是_。（分数：2.50）A.并 B.投影C.交D.选择解析：解析 用于查询的 3 个操作无法用传统的集合运算表示，引
22、入的运算为投影运算、选择运算、笛卡尔积。常用的扩充运算有交、除、连接及自然连接等。投影，从关系模式中指定若干个属性组成新的关系，T 相较于 R 没有缺少属性，故 B 选项错误。选择，从关系中找出满足给定条件的元组的操作称为选择，T 相较于 R 增加了元组，故 D 选项错误。交：RS 结果是既属于 R 又属于 S 的记录组成的集合，T 中元组多于 R 与 S，故 C 选项错误。并：RS 是将 S 中的记录追加到 R 后面，与题目中结果相符，故 A 选项正确。11.下列合法的 Visual Basic 数值变量是_。（分数：2.50）A.“BianLiang”B.aBCD “B“, 24; Pri
23、nt: Print V; B（分数：2.50）A.VB 24 2 5B.VB 242 5 C.V B 242 5D.2 5 242 5解析：解析 语句 Print “V“； “B“，24 先后输出字符 V 和 B 及数字 24，即：VB 24。语句 Print:Print v；B 先输出换行符，再先后输出变量 V 和 B 的值，即：2 5。故正确答案为 B 选项。30.设有函数 （分数：2.50）A.y = IIf(x0, 5, 2) B.y = IIf(x0, 2, 5)C.If x 0 Theny = 2ElseIf x = 0 Theny = 5End IfD.If x0 Theny =
24、 2End IfIf x = 0 Theny = 5End If解析：解析 IIf 函数的格式为：Result = Iff(条件表达式，语句块 1，语句块 2)，当条件表达式为 True 时，返回语句块 1，否则返回语句块 2；选项 A 中，当 x = 0 时，返回 y 值为 2，与题目不符，故正确答案为选项 A。31.有如下程序代码： Private Sub Form_Click( ) Dim a(3, 3) As Integer For i = 1 To 3 For j = 1 To 3 If j 1 And i 1 Then a(i, j) = a(a(i - 1，j - 1), a(i
25、, j - 1) + 1 Else a(i, j) = i * j End If Print a(i, j); Next j Print Next i End Sub 程序运行后，单击窗体，输出结果为_。 A B C D （分数：2.50）A. B.C.D.解析：解析 观察答案，数组的第一行数据均相同，数组的第二行数据均不同。直接进入第二行数据，当 i = 2,j = 1 时，If 条件 j1 And i1 为假，执行 Else 语句，a(2，1) = i * j=2 * 1 =2；当i=2,j=2 时，If 条件 j1 And i1 为真，执行 If 内语句，a(2，2)=a(a(1，1)，
26、a(2，1)+1=a(1，2)+1=2+1=3；由此可知，只有答案 A 符合条件。32.设有如下程序代码： Private Sub Command1_Click( ) Dim x As Integer x = 30 Print f(x) + f(x) End Sub Private Function f(a As Integer) As Integer a = a/3 f = a End Function 运行 Command1_Click 过程所产生的输出是_。（分数：2.50）A.13 B.20C.30D.6解析：解析 VB 默认的参数传递方式是按地址传递。第 1 次调用函数 f(x)时
27、x=30，故 f(30)=10，此时a 的值为 10，x 的值为 10，函数调用结束时，a 被释放，第 2 次调用函数 f(x)时，x=10，故 f(10)=3，所以 f(x)+f(x)=f(30)+f(10)=13。故正确答案为选项 A。33.有如下程序代码： Private Sub Form_Click( ) Dim a(100) As Integer Dim b(100) As Integer For i = 1 To 100 a(i) = i Next i For i = 1 To 100 b(i) = a(i) + a(i - 1) Next i End Sub 运行程序，单击窗体，
28、以下说法中正确的是_。（分数：2.50）A.数组 a 和数组 b 中存放的均为 1100 的整数B.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 101200 的整数C.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 1199 的奇数 D.数组 a 中存放的是 1100 的整数，数组 b 中存放的是 1200 的偶数解析：解析 题目定义两个整型数组 a(100)和 b(100)，数组 a(100)中元素在题中分别赋值 1 到 100；数组 b(100)的值为数组 a(100)元素中相邻的奇数和偶数相加之和，结果为奇数。故正确答案为选项 C。34.有下面程序代码：
29、Private Sub Command1_Click( ) Dim a, s As Integer a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) k = 1 s = 0 Do s = s + a(k) k = k + 2 Loop Until k UBound(A) Print s End Sub 程序运行产生的输出是_。（分数：2.50）A.45B.20 C.16D.25解析：解析 Array 函数为数组 a 的元素赋值，使得 a(0)a(8)的值被分别赋值为 19；UBound(a)函数返回数组可用的最大下标 8，DoLoop Until 循环先执行循环体，后判
30、断终止条件 k 8 是否成立，条件成立时，Do 循环共执行 4 次，因此 s=a(1) +a(3) +a(5) +a(7) =2+4+6+8=20。故正确答案为选项B。35.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Print “ABCD“; Else Print “DDDD“; End If End Sub Private Sub Co
31、mmand1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print “EFGH“ End Sub 程序运行后，单击命令按钮，输出结果是_。（分数：2.50）A.ABCDEFGHB.DDDDEFGH C.ABCDD.EFGH解析：解析 MouseDown 是按下鼠标时触发的事件，MouseUp 是松开鼠标时触发的事件。鼠标键参数中Button=2 表示按下右键。单击命令按钮时，先用鼠标单击一下左键，在此过程中，鼠标会从按下转为松开。先触发 MouseDown 事件，因 button! =2 故输出
32、 DDDD，再触发 MouseUp 事件，输出 EFGH。故本题正确答案为选项 B。36.在窗体上画一个名称为 Command1 的命令按钮，然后编写其 Click 事件过程代码如下： Private Sub Command1_Click( ) Dim i As Integer, num As Integer Do For i = 1 To 10 hum=Int(Rnd * 10) + 1 Select Case num Case 2 Exit For Case 7 Exit Do End Select n = n + 1 Next i Loop Print n End Sub 则下面描述中正
33、确的是_。（分数：2.50）A.当变量 num 的值为 2 时，事件过程 Command1_Click 执行结束B.当变量 num 的值为 7 时，Do 循环将终止 C.变量 num 的值一定是大于或等于 11 的整数D.Do 循环的执行次数一定为 10 次解析：解析 选项 A，当变量 num 值为 2 时，满足 Case 2，退出 For 循环。注意，其仅退出内层 For 循环，没有退出外层 Do 循环，故选项 A 错误；Rnd 英文全称 Random，意为随机数，Rnd * 10 生成一个取值在1，10)之间的随机数(注意不包含 10)。取整函数 Int(x)，返回值为不大于自变量 x 的
34、最大整数，num = Int(Rnd * 10) +1，生成一个在 1 到 10 之间的随机整数，故选项 C 错误；但 SelectCase 中，满足Case 7 时，直接退出 DoWhile 循环，循环结束，故 Do 循环的执行次数不一定为 10 次，D 选项错误；本题正确答案为选项 B。37.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim x As Integer x = -10 Mod -4 If x = -1 Then Print -1; If x = -2 Then Print -2; I
35、f x = -3 Then Print -3; Print End Sub 程序运行时，单击 Command1，则在窗体上输出的结果是_。（分数：2.50）A.-1B.-2C.-1 -2 D.-1 -2 -3解析：解析 If 条件 Then 部分，如果选择的条件为真，则执行 Then 部分；x= -10 Mod -4 = -2；三个If 条件中，x = -1 和 x = -2 条件为真，输出-1 -2，x = -3 为假，不执行 Then 部分。故本题正确答案为选项 C。38.假定把计时器控件 Timer1 的 Interval 属性设置为 10，Enabled 属性设置为 True，并编写下
36、面的程序：Dim x As Integer Private Sub Timer1_Timer( ) For i = 1 To 100 x = x+1 Next i Print x End Sub 程序运行一段时间后的结果是_。（分数：2.50）A.输出 100 后正常结束B.输出 1000 后正常结束C.输出 10000 后正常结束D.出错 解析：解析 Timer 控件的 Interval 属性用来设置或返回计时事件间隔的毫秒数，Enabled 属性用来设置是否触发时钟事件。如果 Interval 属性值不为 0 并且 Enabled 属性不为 False，则 Timer 事件就会不停地按照设
37、置的事件间隔发生下去。题目中所给程序并没有结束条件，程序的执行结果会出错。故正确答案为选项 D。39.设窗体上有一个名称为 Command1 的命令按钮和一个名称为 Timer1 的计时器，并有下面程序代码： Private Sub Form_Load( ) Timer1. Enabled = False Timer1. Interval = 500 End Sub Private Sub Command1_Click( ) Timer1. Enabled = True End Sub Private Sub Timer1_Timer( ) If Command1. Left 0 Then C
38、ommand1. Left = Command1. Left - 100 End If End Sub 下面叙述中正确的是_。（分数：2.50）A.程序一运行，命令按钮就向左移动，到窗体左端停止B.程序运行后，单击命令按钮，则按钮向左移动，到窗体左端停止 C.程序运行后，单击命令按钮，则按钮向左移动，每秒移动一次D.程序一运行，命令按钮就向右移动，到窗体右端停止解析：解析 窗体装入事件 Form_Load( )表示程序执行后加载窗体时，Timer1 的 Enabled 属性为False，计时器不工作，并设定每隔 500 毫秒即 0.5 秒，执行一次计时器事件；命令按钮单击事件Command1_
39、Click( )表示点击命令按钮时计时器开始工作；Timer1_Timer( )过程表示计时器事件，判断命令按钮的左边距 Left 是否大于 0，条件为真时，向左移 100Twip 单位。故正确答案为选项 B。40.在窗体上画一个名称为 Command1 的命令按钮，并编写如下程序： Private Sub Command1_Click( ) Dim a As Integer Static b As Integer a = 20 b = 5 Call sub1(a, b) Print a; b End Sub Private Sub sub1(ByRef x1 As Integer, y1 A
40、s Integer) x1 = x1 + 3 y1 = x1 + y1 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是_。（分数：2.50）A.23 23B.23 28 C.20 5D.20 25解析：解析 用 Call 语句调用 Sub 过程，如果形参前面有关键字 ByRef，则该参数按地址传送，本题中形参 x1 前有关键字 ByRef，调用时以地址方式传递实参，调用 sub 过程，x1 =x1 +3=23，改变了实参 a的值，a 为 23。如果形参前面没有关键字 ByRef 或 ByVal，系统默认为按地址传递参数。调用 sub 过程中，x1 =x1 +3=23；y1 =23+5=28。形参 y1 值的变化改变了实参 b 的值，故 b=28。本题正确答案为选项 B。
