1、计算机等级考试二级 VISUAL+BASIC 分类真题 2014 年 3 月及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.下列叙述中正确的是_。（分数：2.50）A.有且只有一个根结点的数据结构一定是线性结构B.每一个结点最多有一个前件也最多有一个后件的数据结构一定是线性结构C.有且只有一个根结点的数据结构一定是非线性结构D.有且只有一个根结点的数据结构可能是线性结构，也可能是非线性结构2.某二叉树的前序遍历为 ABCD，中序遍历为 DCBA，则后序遍历为_。（分数：2.50）A.在双向链表中，可以从任何一个结点开始直接遍历到所有结点B
2、.在循环链表中，可以从任何一个结点开始直接遍历到所有结点C.在线性单链表中，可以从任何一个结点开始直接遍历到所有结点D.在二叉链表中，可以从根结点开始遍历到所有结点3.某二叉树共有 13 个结点，其中有 4 个度为 1 的结点，则叶子结点数为_。（分数：2.50）A.5B.4C.3D.24.设栈的顺序存储空间为 S(1:50)，初始状态为 top=0。现经过一系列入栈与退栈运算后，top=20，则当前栈中的元素个数为_。（分数：2.50）A.30B.29C.20D.195.结构化程序包括的基本控制结构是_。（分数：2.50）A.主程序与子程序B.选择结构、循环结构与层次结构C.顺序结构、选择结
3、构与循环结构D.输入、处理、输出6.程序测试的目的是_。（分数：2.50）A.执行测试用例B.发现并改正程序中的错误C.发现程序中的错误D.诊断和改正程序中的错误7.下面属于系统软件的是_。（分数：2.50）A.财务管理系统B.数据库管理系统C.编辑软件 WordD.杀毒软件8.在关系 A(S，SN，D)和 B(D，CN，NM)中，A 的主关键字是 S，B 的主关键字是 D，则 D 是 A 的_。（分数：2.50）A.外键(码)B.候选键(码)C.主键(码)D.元组9.有两个关系 R，S 如下，由关系 R 和 S 通过运算得到关系 T，则所使用的操作为_。 R B C D a 0 k1 b 1
4、 n1 S B C D f 3 k2 a 0 k1 T B T D b 1 n1 （分数：2.50）A.并B.自然连接C.笛卡尔积D.差10.在数据库管理系统提供的数据语言中，负责数据模式定义的是_。（分数：2.50）A.数据定义语言B.数据管理语言C.数据操纵语言D.数据控制语言11.表达式 Sgn(15.6)+Int(-16.8)的值是_。（分数：2.50）A.17B.-15C.18D.-1612.下面肯定是一个整型变量的是_。（分数：2.50）A.x%B.Int_xC.x$D.x#13.设变量 MyName(字符串型)，Age(整型)分别表示一个人的姓名和年龄，要设计一个逻辑表达式，当该
5、人姓张，并且超过 60 岁，则表达式的值为 True，下面正确的是_。（分数：2.50）A.Right(MyName, 1) = “张“ And Age 60B.Left(MyName, Len(“张“) = “张“ And Age 60C.Left(MyName, Len(“张“) = “张“ Or Age 60D.MyName = “张“ And Age 6014.下列说法中正确的是_。（分数：2.50）A.引用属性的一般格式为：对象名_属性名称B.对象是有属性和行为方式的实体C.属性是对象的特性，所有对象都具有相同的属性D.对象的属性只能在属性窗口中设置15.下列叙述中正确的是_。（分数
6、：2.50）A.不同的对象可以具有相同名称的方法B.“abcd“是一个合法的字符串常量C.语句 Dim a(1 To 6，-2 To 4) As Integer 定义数组时出错D.向随机文件中写数据时，既可用 Write #语句也可用 Put #语句16.对于复选框和单选按钮，下列叙述中正确的是_。（分数：2.50）A.复选框和单选按钮都只能在多个选项中选定一项B.复选框和单选按钮都有 Value 属性，取值均为 True 或 FalseC.单选按钮和复选框都可以响应双击(DblClick)事件D.为了使复选框禁用，应将其 Enabled 属性设置为 False17.程序运行时，当用鼠标点击滚
7、动条两端的箭头按钮时，不会产生的结果是_。（分数：2.50）A.改变 Value 属性的值B.激活 Scroll 事件C.激活 Change 事件D.滚动框移动18.下面说法中错误的是_。（分数：2.50）A.为使名称为 Timer1 的计时器控件能每隔 2 秒触发一次 Timer 事件，则在程序代码中应写的语句是Timer1. Interval = 2000B.可以将计时器控件的 Enabled 属性设置为 False，使其不能触发 Timer 事件C.为使显示到图像框中的图像能根据图像框的大小自动缩放，则应将图像框的 Stretch 属性值设置为TrueD.在设计阶段，把已复制到剪贴板上的
8、图像粘贴到图片框或图像框中，可以将该图片装入图片框或图像框19.如果一个复选框被选中，则_。（分数：2.50）A.它的 Caption 属性的值为 1B.它的 Value 属性的值为 1C.它的 Value 属性的值为 TrueD.其他复选框被自动设置为未选中20.在窗体上建立一个标签数组，名称为 Label1，下标从 0 开始，自左至右顺序增大，然后编写如下事件过程： Private Sub Form_Click( ) For Each Label In Label1 Label1(i). Caption = Label1(i). Index i = i + 1 Next End Sub 运
9、行程序，单击窗体，在 4 个标签(从左至右)中显示的内容分别为_。（分数：2.50）A.0 1 2 3B.1 2 3 4C.3 2 1 0D.出错21.设列表框的名称为 List1，则下列与 List1. Text 中的值相同的属性值是_。（分数：2.50）A.List1. ListCountB.List1. List(List1. ListIndex)C.List1. List(ListCount - 1)D.List1. ListIndex22.下面关于直线控件的叙述中正确的是_。（分数：2.50）A.改变 X1、Y1、X2、Y2 属性的值，可以改变直线显示的长短和方向B.X1、Y1 属性
10、的值表示直线左端点的坐标C.如果属性 X1 的值等于属性 X2 的值，则说明直线是水平显示的D.上述都是正确的23.有如下程序代码： Private Sub Form_Click( ) Dim Sum As Integer Sum = 0 While Sum = 20 Sum = Sum + 1 Wend Print Sum End Sub 运行程序，单击窗体，输出结果是_。（分数：2.50）A.19B.20C.21D.2224.有下面程序代码： Private Sub Commandl_Click( ) Dim a a = Array(1, 2, 3, 4, 5) Call proc(A)
11、For k = 0 To 4 Print a(k); Next k End Sub Private Sub proc(ByVal x) For k = LBound(x)To UBound(x) x(k) = x(k) * 2 Next k End Sub 运行 Command1_Click 过程产生的输出是_。（分数：2.50）A.2 4 6 8 10B.1 2 3 4 5C.5 4 3 2 1D.10 8 6 4 225.有下面程序代码： Private Sub Command1_Click( ) Dim a%(10) For k = 1 To 9 a(k) = InputBox(“ “)
12、 Next. k Call proc(a( ), 6, 3, 10) For k = 1 To 10 Print a(k); “ “; Next k End Sub Private Sub proc(a%( ), x%, m%, n%) For k = n To m + 1 Step -1 a(k) = a(k - 1) Next k a(k) = x End Sub Command1_Click 过程运行时，从键盘输入 9 个数：12 32 65 34 87 56 79 50 52，则输出是_。（分数：2.50）A.12 32 65 34 87 56 79 50 52B.6 12 32 65
13、 34 87 56 79 50 52C.12 32 65 34 87 56 79 50 52 6D.12 32 6 65 34 87 56 79 50 5226.设整型数组 a 有 10 个元素，其中前 9 个元素中数已按小到大顺序排列，下面程序段的作用是_。 x = InputBox(“请输入一个整数“) k = 8 Do If x = a(k) Then a(k+1) = x Exit Do Else a(k + 1) = a(k) If k = 0 Then a(k) = x k = k - 1 End If Loop Until k 0（分数：2.50）A.把 x 中的数插入数组 a，
14、使数组中的数仍然保持从小到大的顺序B.在数组 a 中找到小于或等于 x 的数，把 x 中的数放到这个数的后面C.把 x 中的数放到下标为 0 的数组元素中D.把数组 a 中的数依次后移，然后把 x 中的数放到数组的最前面27.以下是窗体的 Click 事件过程： Private Sub Form_Click( ) Dim a As Integer a = 1 Do a = a + 5 Loop Until a 18 Print a End Sub 程序运行过程中单击窗体，输出结果是_。（分数：2.50）A.1B.20C.16D.2128.在窗体上画一个名称为 Text1 的文本框和一个名称为
15、Command1 的命令按钮，然后编写以下程序代码： Option Base 1 Private Sub Command1_Click( ) Dim arr1(4, 4) As Integer Dim i As Integer, j As Integer For i = 1 To 2 For j = 2 To 3 arr1(i, j) = i+j * 10 Next j Next i Text1. Text = arr1(2, 3) + arr1(3, 4) End Sub 运行程序，单击 Command1，则在文本框 Text1 中显示的结果为_。（分数：2.50）A.75B.23C.57D
16、.3229.执行以下程序时，在窗体上单击鼠标后，将出现输入对话框，此时，直接按下回车键，窗体上的输出结果是_。 Private Sub Form_Click( ) Dim S As String S = InputBox(“input data“, “important“, “学习 VisualBasic“) Print UCase(Mid(S, InStr(S, “i“), 2) End Sub（分数：2.50）A.INB.IMC.ISD.IC30.设有工程文件 Proj，其中含有 Form1 窗体、Form2 窗体、标准模块 Module1. bas 在 Form1 窗体模块的通用声明段中
17、书写了如下语句 Public X As Integer，在 Form1 窗体模块中还定义了通用过程 LocalSub。则以下说法中正确的是_。（分数：2.50）A.可以在整个 Proj 工程中的所有模块中使用变量 XB.只能在窗体 Form1 和 Form2 中使用变量 X，但不能在标准模块 Module1 中使用变量 XC.在标准模块 Module1 中可以使用变量 X，但在窗体 Form2 中不能使用变量 XD.变量 X 的作用范同不包含 Form1 中的 LocalSub31.下面关于数组声明：Dim arr( ) As Integer 的叙述中正确的是_。（分数：2.50）A.arr
18、是整型数组，其元素个数是默认值为 10B.arr 是整型数组，其元素个数不确定，需要在后面再用 ReDim 语句定义C.arr 是无参数的函数，其返回值的类型是整型D.上述都是错误的32.下列关于 Sub Main 过程的说法中正确的是_。（分数：2.50）A.Sub Main 过程属于通用过程B.Sub Main 过程属于事件过程C.Sub Main 过程必须出现在窗体模块中D.Sub Main 过程不能作为启动对象33.下面关于菜单的叙述中正确的是_。（分数：2.50）A.程序运行时，菜单上显示的是菜单项的名称(Name 属性的值)B.要想使某个菜单项被选中时能够完成某项任务，必须为它编写
19、事件过程C.如果用菜单编辑器编辑了一个下拉式菜单，程序中所有窗体都会显示这个菜单D.要显示弹出式菜单，应调用该菜单的 PopupMenu 方法34.设通用对话框的名称为 CommonDialog1，执行语句 CommonDialog1. Action = 3，则打开的对话框是_。（分数：2.50）A.颜色对话框B.字体对话框C.打开文件对话框D.保存文件对话框35.在窗体上画一个名称为 Text1 的文本框，然后编写如下事件过程：Private Sub Form_Load( ) Text1. Text=“ “ End Sub Private Sub Text1_KeyDown(KeyCode
20、As Integer, Shift As Integer) Const Alt = 4 Const Key_F2 = C Next i End Sub 以上程序的功能是_。（分数：2.50）A.输出从键盘上输入的字符串，计算其长度并输出B.输出从键盘上输入的字符串，统计字符串中字符“D”的个数并输出C.输出从键盘上输入的字符串，找出其中的字符“D”并输出D.把从键盘上输入的字符串中的所有字符换成字符“D”并输出38.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim x As Integer, y As
21、Integer Dim s As String s = “2013-2014“ x = Int(Rnd(1) + 100 y = Val(Left(s, 3) Select Case x + y Case Is 301 Print “分支 1“ Case 300 To 301 Print “分支 2“ Case Is 301 Print “分支 3“ End Select End Sub 程序运行时，单击 Command1，则在窗体上输出的结果是_。（分数：2.50）A.分支 1B.分支 2C.分支 3D.无任何输出39.有下面程序代码： Private Sub Command1_Click(
22、 ) Dim k As Integer For k = 1 To 3 Call fun(k) Next k For k = 1 To 3 Call proc(k) Next k End Sub Private Sub fun(x As Integer) Static a As Integer a = a + 1 Print a * x; End Sub Private Sub proc(x As Integer) Dim a As Integer a = a + 1 Print a * x; End Sub 运行 Command1_Click 过程产生的输出是_。（分数：2.50）A.1 2
23、3 1 2 3B.1 4 9 1 2 3C.1 4 9 1 4 9D.1 2 3 1 4 940.为了把文本框 Text1 中输入的小写字母的大写形式同步显示在文本框 Text2 中，应该使用的事件过程是_。（分数：2.50）A.Private Sub Text1_Change( )Text2. Text=UCase(Textl. Text)End SubB.Private Sub Text1_Change( )Text1. Text=UCase(Text2. Text)End SubC.Private Sub Text1_LostFocus( )Text2. Text = UCase(Tex
24、t1. Text)End SubD.Private Sub Text1_LostFocus( )Text1. Text = UCase(Text2.Text)End Sub计算机等级考试二级 VISUAL+BASIC 分类真题 2014 年 3 月答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：100.00)1.下列叙述中正确的是_。（分数：2.50）A.有且只有一个根结点的数据结构一定是线性结构B.每一个结点最多有一个前件也最多有一个后件的数据结构一定是线性结构C.有且只有一个根结点的数据结构一定是非线性结构D.有且只有一个根结点的数据结构可能是线性结构，
25、也可能是非线性结构 解析：解析 一个非空的数据结构如果满足以下两个条件：有且只有一个根结点；每一个结点最多有一个前件，也最多有一个后件，称为线性结构，故 A、B 和 C 选项都错误；不同时满足以上两个条件的数据结构就称为非线性结构，其中树形结构只有一个根结点，D 选项正确。2.某二叉树的前序遍历为 ABCD，中序遍历为 DCBA，则后序遍历为_。（分数：2.50）A.在双向链表中，可以从任何一个结点开始直接遍历到所有结点B.在循环链表中，可以从任何一个结点开始直接遍历到所有结点C.在线性单链表中，可以从任何一个结点开始直接遍历到所有结点 D.在二叉链表中，可以从根结点开始遍历到所有结点解析：解
26、析 线性单链表就是指线性表的链式存储结构，这种结构只能从一个节点遍历到其后的所有节点，故 C 选项叙述错误；在单链表的第一个节点前增加一个表头节点，队头指针指向表头节点，所以可以从任何一个节点开始直接遍历到所有节点，最后一个节点的指针域的值由 NULL 改为指向表头节点，这样的链表称为循环链表；双向链表是指链表节点含有指向前一个节点的指针和指向后一个节点的指针，所以可以从任何一个节点开始直接遍历到所有节点；二叉树链表中节点指针由父节点指向子节点，可以从根节点开始遍历到所有节点，所以选项 A、B、D 叙述均正确。3.某二叉树共有 13 个结点，其中有 4 个度为 1 的结点，则叶子结点数为_。（
27、分数：2.50）A.5 B.4C.3D.2解析：解析 在树结构中，一个节点所拥有的后件个数称为该节点的度。对任何一棵二叉树，度为 0 的节点(即叶子节点)总是比度为 2 的节点多一个。二叉树中有 13 个节点，设叶子节点个数为 n 0 ，度为 1的节点个数为 4，设度为 2 的节点个数为 n 2 。13=n 0 +4+n 2 且 n 0 =n 2 +1，则 n 0 =5，n 2 =4。A 选项正确。4.设栈的顺序存储空间为 S(1:50)，初始状态为 top=0。现经过一系列入栈与退栈运算后，top=20，则当前栈中的元素个数为_。（分数：2.50）A.30B.29C.20 D.19解析：解析
28、 栈是一种特殊的线性表，它所有的插入与删除都限定在表的同一端进行。入栈运算即在栈顶位置插入一个新元素，退栈运算即是取出栈顶元素赋予指定变量。当栈为空时，栈顶指针 top=0，经过入栈和退栈运算，指针始终指向栈顶元素。top=20，则当前栈中有 20 个元素，C 选项正确。5.结构化程序包括的基本控制结构是_。（分数：2.50）A.主程序与子程序B.选择结构、循环结构与层次结构C.顺序结构、选择结构与循环结构 D.输入、处理、输出解析：解析 结构化程序包括的基本控制结构只有三种，即顺序结构、选择结构与循环结构，C 选项正确。6.程序测试的目的是_。（分数：2.50）A.执行测试用例B.发现并改正
29、程序中的错误C.发现程序中的错误 D.诊断和改正程序中的错误解析：解析 测试的目的是发现软件中的错误，但是，暴露错误并不是软件测试的最终目的，测试的根本目的是尽可能多地发现并排除软件中隐藏的错误，C 选项正确。7.下面属于系统软件的是_。（分数：2.50）A.财务管理系统B.数据库管理系统 C.编辑软件 WordD.杀毒软件解析：解析 计算机软件按功能分为应用软件、系统软件、支撑软件(或工具软件)。系统软件是管理计算机的资源，提高计算机的使用效率，为用户提供各种服务的软件，如操作系统、数据库管理系统、编译程序、汇编程序和网络软件等，B 选项正确。A、C、D 选项为应用软件。8.在关系 A(S，
30、SN，D)和 B(D，CN，NM)中，A 的主关键字是 S，B 的主关键字是 D，则 D 是 A 的_。（分数：2.50）A.外键(码) B.候选键(码)C.主键(码)D.元组解析：解析 二维表中的一行称为元组。候选键(码)是二维表中能唯一标识元组的最小属性集。若一个二维表有多个候选码，则选定其中一个作为主键(码)供用户使用。表 M 中的某属性集是表 N 的候选键或者主键，则称该属性集为表 M 的外键(码)。A 中属性集 D 是 B 的主关键字，故 D 是 A 的外键(码)，A 选项正确。9.有两个关系 R，S 如下，由关系 R 和 S 通过运算得到关系 T，则所使用的操作为_。 R B C
31、D a 0 k1 b 1 n1 S B C D f 3 k2 a 0 k1 T B T D b 1 n1 （分数：2.50）A.并B.自然连接C.笛卡尔积D.差 解析：解析 常用的扩充运算有交、除、连接及自然连接等。并：RS 是将 S 中的记录追加到 R 后面。差：R - S 结果是属于 R 但不属于 S 的记录组成的集合。交：RS 结果是既属于 R 又属于 S 的记录组成的集合。关系 R 中记录(b 1 n1)不属于 S，所以 R - S=T。D 选项正确。10.在数据库管理系统提供的数据语言中，负责数据模式定义的是_。（分数：2.50）A.数据定义语言 B.数据管理语言C.数据操纵语言D.
32、数据控制语言解析：解析 数据库管理系统提供了相应的数据语言，它们是：数据定义语言，该语言负责数据的模式定义与数据的物理存取构建；数据操纵语言，该语言负责数据的操纵，包括查询与增、删、改等操作；数据控制语言，该语言负责数据完整性、安全性的定义与检查以及并发控制、故障恢复等功能。A 选项正确。11.表达式 Sgn(15.6)+Int(-16.8)的值是_。（分数：2.50）A.17B.-15 C.18D.-16解析：解析 Sgn(x)英文全称 Signal(x)，即求变量 x 的符号。注意其与变量 x 为大小无关，仅与变量正负有关。x 为正数，返回 1；x 为负数，返回-1；x 为 0，返回 0。
33、15.6 为正数，故 sgn(15.6)=1。Int(x)英文全称 Integer(x)，Integer，中文意为整数，Int(x)为取整函数，细分为上取整和下取整，Int(-16.8)为下取整，结果为-16，如果为 Int(16.8)结果则为 16。记忆法则：拆上补下(变量 x 大小 0 就拆掉小数点之后的数，小于 0 则给其补一些)。所以表达式 Sgn(15.6)+Int(-16.8)值为-15，敝选 B。12.下面肯定是一个整型变量的是_。（分数：2.50）A.x% B.Int_xC.x$D.x#解析：解析 选项 B 中，x 也可能是字符类型；选项 C 中，$是字符串类型符；选项 D 中
34、，#是双精度浮点数类型符。故正确答案为选项 A。13.设变量 MyName(字符串型)，Age(整型)分别表示一个人的姓名和年龄，要设计一个逻辑表达式，当该人姓张，并且超过 60 岁，则表达式的值为 True，下面正确的是_。（分数：2.50）A.Right(MyName, 1) = “张“ And Age 60B.Left(MyName, Len(“张“) = “张“ And Age 60 C.Left(MyName, Len(“张“) = “张“ Or Age 60D.MyName = “张“ And Age 60解析：解析 Left(s, n)是从字符串的左端起截取 n 个字符；Righ
35、t(s, n)是从字符串的右端起截取 n 个字符；姓名是姓在左，名在右，故 A 选项错误。将“张”赋值给变量 MyName，不符合题目要求，故 D 选项错误。函数 kn(s)返回字符串 s 的长度，即所包含的字符的个数。Left(MyName，Len(“张“)=“张“And Age60 表示当该人姓张，并且超过 60 岁，表达式的值为 True，故正确答案为 B 选项。14.下列说法中正确的是_。（分数：2.50）A.引用属性的一般格式为：对象名_属性名称B.对象是有属性和行为方式的实体 C.属性是对象的特性，所有对象都具有相同的属性D.对象的属性只能在属性窗口中设置解析：解析 引用属性的格式
36、为：对象名. 属性名称，A 选项错误。不同的对象具有不同的属性，C 选项错误。对象的属性既可通过属性窗口设置也可通过程序代码来设置，D 选项错误。故正确答案为 B 选项。15.下列叙述中正确的是_。（分数：2.50）A.不同的对象可以具有相同名称的方法 B.“abcd“是一个合法的字符串常量C.语句 Dim a(1 To 6，-2 To 4) As Integer 定义数组时出错D.向随机文件中写数据时，既可用 Write #语句也可用 Put #语句解析：解析 字符串常量由字符组成，可以是双引号和回车符以外的任何 ASCII 字符，选项 B 中应该用一对双引号括起来。选项 C 所定义的数组正
37、确，Write#语句的功能是向顺序文件写入记录，Put#语句的功能是把“变量”的内容写入由“文件”号所指定的磁盘文件中，故本题正确选项为 A。16.对于复选框和单选按钮，下列叙述中正确的是_。（分数：2.50）A.复选框和单选按钮都只能在多个选项中选定一项B.复选框和单选按钮都有 Value 属性，取值均为 True 或 FalseC.单选按钮和复选框都可以响应双击(DblClick)事件D.为了使复选框禁用，应将其 Enabled 属性设置为 False 解析：解析 复选框，可以在多个选项中选定多个选项，故选项 A 错误。单选按钮和复选框都有 Value值，取值不同，单选按钮取值为布尔型，而
38、复选框的取值为数值型，故答案 B 错误。单选按钮和复选框的主要事件是“单击事件”，而不是“双击事件”，故选项 C 错误。当将复选框的 Enabled 属性设置为False 时，禁用复选框。故本题正确答案为 D 选项。17.程序运行时，当用鼠标点击滚动条两端的箭头按钮时，不会产生的结果是_。（分数：2.50）A.改变 Value 属性的值B.激活 Scroll 事件 C.激活 Change 事件D.滚动框移动解析：解析 对滚动条的操作一般就是移动，滚动条事件有 Scroll 事件和 Change 事件，故选项 A、C和 D 均正确；本题答案为 B。18.下面说法中错误的是_。（分数：2.50）A
39、.为使名称为 Timer1 的计时器控件能每隔 2 秒触发一次 Timer 事件，则在程序代码中应写的语句是Timer1. Interval = 2000B.可以将计时器控件的 Enabled 属性设置为 False，使其不能触发 Timer 事件C.为使显示到图像框中的图像能根据图像框的大小自动缩放，则应将图像框的 Stretch 属性值设置为TrueD.在设计阶段，把已复制到剪贴板上的图像粘贴到图片框或图像框中，可以将该图片装入图片框或图像框 解析：解析 图形文件的装入有两种方式：一是在属性窗口中装入，二是在程序代码中用 LoadPicture函数装入，复制到粘贴板上的图像不能装入图片框或
40、图像框。故正确答案为选项 D。19.如果一个复选框被选中，则_。（分数：2.50）A.它的 Caption 属性的值为 1B.它的 Value 属性的值为 1 C.它的 Value 属性的值为 TrueD.其他复选框被自动设置为未选中解析：解析 复选框 Value 属性用来返回或设置复选框的状态，其取值为：0 - Unchecked 为默认值，表示没有选中该复选框；1 - Checked 表示选中该复选框；2 - Grayed 表示复选框被禁止。故本题正确答案为 B 选项。20.在窗体上建立一个标签数组，名称为 Label1，下标从 0 开始，自左至右顺序增大，然后编写如下事件过程： Priv
41、ate Sub Form_Click( ) For Each Label In Label1 Label1(i). Caption = Label1(i). Index i = i + 1 Next End Sub 运行程序，单击窗体，在 4 个标签(从左至右)中显示的内容分别为_。（分数：2.50）A.0 1 2 3 B.1 2 3 4C.3 2 1 0D.出错解析：解析 控件数组由一组具有相同名称和类型，且事件过程也相同的控件组成，每个控件(相当于数组元素)都有唯一的索引号(Index，相当于数组元素的下标)。标签 Label1. Caption 用来显示在标签标题中显示的文本。由题知，标
42、签数组 Label1 下标从 0 开始，自左至右按顺序增大，故 Label1(0). index = 0；Label1(1). index = 1：Label1(2). index = 2；Label1(3). index = 3；本题正确答案为 A。21.设列表框的名称为 List1，则下列与 List1. Text 中的值相同的属性值是_。（分数：2.50）A.List1. ListCountB.List1. List(List1. ListIndex) C.List1. List(ListCount - 1)D.List1. ListIndex解析：解析 列表框的 List 属性用来列出
43、或设置列表项的内容；ListIndex 设置返回当前被选择项目的索引号；ListCount 返回列表框中项目数量的数值。List1. List(List1. ListIndex)返回索引为 List1. ListIndex 的值，题目 List1. Text 返回当前被选择项目的内容，故正确答案为选项 B。22.下面关于直线控件的叙述中正确的是_。（分数：2.50）A.改变 X1、Y1、X2、Y2 属性的值，可以改变直线显示的长短和方向 B.X1、Y1 属性的值表示直线左端点的坐标C.如果属性 X1 的值等于属性 X2 的值，则说明直线是水平显示的D.上述都是正确的解析：解析 X1，Y1 表示
44、直线的起点坐标，选项 B 错误；X1 和 X2 的值相等，表示直线是垂直显示的，选项 C 错误。故正确答案为选项 A。23.有如下程序代码： Private Sub Form_Click( ) Dim Sum As Integer Sum = 0 While Sum = 20 Sum = Sum + 1 Wend Print Sum End Sub 运行程序，单击窗体，输出结果是_。（分数：2.50）A.19B.20C.21 D.22解析：解析 While 循环只有在“条件”为真(True)的情况下执行循环体。如果条件从一开始不成立，则一次循环也不执行。本题程序运行时，sum=0，符合条件 s
45、um =20，执行循环体，sum =0 +1 =1；当sum =1 时，sum =20，继续执行循环体，sum =2；如此下去，当 sum =20 时，sum =20，执行该循环体后，sum =21，不再符合循环执行条件，退出循环。故本题正确答案为 C。24.有下面程序代码： Private Sub Commandl_Click( ) Dim a a = Array(1, 2, 3, 4, 5) Call proc(A) For k = 0 To 4 Print a(k); Next k End Sub Private Sub proc(ByVal x) For k = LBound(x)To
46、 UBound(x) x(k) = x(k) * 2 Next k End Sub 运行 Command1_Click 过程产生的输出是_。（分数：2.50）A.2 4 6 8 10B.1 2 3 4 5 C.5 4 3 2 1D.10 8 6 4 2解析：解析 用 Call 语句调用 Sub 过程。如果形参前面有关键字 ByRef，则该参数按地址传送，形参 x1前有关键字 ByVal，调用时按值传递，形参对实参的值作更改不会改变相应实参的值。最后要输出的是数组 a 中元素，而调用过程 proc 不会改变相应实参，所以完全可以不用看过程 proc，直接进入 For 循环，打印出数组中各个元素值
47、。故最后结果为 1，2，3，4，5。本题正确答案为 B。25.有下面程序代码： Private Sub Command1_Click( ) Dim a%(10) For k = 1 To 9 a(k) = InputBox(“ “) Next. k Call proc(a( ), 6, 3, 10) For k = 1 To 10 Print a(k); “ “; Next k End Sub Private Sub proc(a%( ), x%, m%, n%) For k = n To m + 1 Step -1 a(k) = a(k - 1) Next k a(k) = x End Su
48、b Command1_Click 过程运行时，从键盘输入 9 个数：12 32 65 34 87 56 79 50 52，则输出是_。（分数：2.50）A.12 32 65 34 87 56 79 50 52B.6 12 32 65 34 87 56 79 50 52C.12 32 65 34 87 56 79 50 52 6D.12 32 6 65 34 87 56 79 50 52 解析：解析 数组作为过程的参数时，进行的是按地址传递，即将实参数组的起始地址传递给形参。本题首先用数组 a(k)接收键盘中输入的数，进行初始化；proc( )过程实现从 a(10)开始依次将后一位值赋值给其前一位，直到 a(4)。当 k=3 时，结束循环，并将 x 的值赋值给 a(3)。故正确答案为选项 D。26.设整型数组 a 有 10 个元素，其中前 9 个元素中数已按小到大顺序排列，下面程序段的作用是_。 x = InputBox(“请输入一个整数“) k = 8 Do If x = a(k) Then a(k+
