1、二级 VISUAL+BASIC-52 (1)及答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：40，分数：100.00)1.下列叙述中正确的是_。 A.算法就是程序 B.设计算法时只需要考虑数据结构的设计 C.设计算法时只需要考虑结果的可靠性 D.以上三种说法都不对（分数：3.00）A.B.C.D.2.下列叙述中正确的是_。 A.有一个以上根结点的数据结构不一定是非线性结构 B.只有一个根结点的数据结构不一定是线性结构 C.循环链表是非线性结构 D.双向链表是非线性结构（分数：3.00）A.B.C.D.3.下列关于二叉树的叙述中，正确的是_。 A.叶子结点总是比度
2、为 2 的结点少一个 B.叶子结点总是比度为 2 的结点多一个 C.叶子结点数是度为 2 的结点数的两倍 D.度为 2 的结点数是度为 1 的结点数的两倍（分数：3.00）A.B.C.D.4.软件生命周期中的活动不包括_。 A.市场调研 B.需求分析 C.软件测试 D.软件维护（分数：3.00）A.B.C.D.5.某系统总体结构图如下图所示：该系统总体结构图的深度是_。（分数：3.00）A.B.C.D.6.程序调试的任务是_。 A.设计测试用例 B.验证程序的正确性 C.发现程序中的错误 D.诊断和改正程序中的错误（分数：3.00）A.B.C.D.7.下列关于数据库设计的叙述中，正确的是_。
3、A.在需求分析阶段建立数据字典 B.在概念设计阶段建立数据字典 C.在逻辑设计阶段建立数据字典 D.在物理设计阶段建立数据字典（分数：3.00）A.B.C.D.8.数据库系统的三级模式不包括_。 A.概念模式 B.内模式 C.外模式 D.数据模式（分数：3.00）A.B.C.D.9.有三个关系 R，S 和 T 如下：则由关系 R 和 S 得到关系 T 的操作是_。（分数：3.00）A.B.C.D.10.下列选项中属于面向对象设计方法主要特征的是_。 A.继承 B.自顶向下 C.模块化 D.逐步求精（分数：3.00）A.B.C.D.11.以下合法的 VB 变量名是_。 A.#_1 B.123_a
4、 C.string D.x_123（分数：3.00）A.B.C.D.12.以下关于 VB 的叙述中，错误的是_。 A.VB 采用事件驱动方式运行 B.VB 既能以解释方式运行，也能以编译方式运行 C.VB 程序代码中，过程的书写顺序与执行顺序无关 D.VB 中一个对象对应一个事件（分数：3.00）A.B.C.D.13.有如下数据定义语句：Dim X,Y As Integer以上语句表明_。 A.X、Y 均是整型变量 B.X 是整型变量，Y 是变体类型变量 C.X 是变体类型变量，Y 是整型变量 D.X 是整型变量，Y 是字符型变量（分数：3.00）A.B.C.D.14.以下关于控件数组的叙述中
5、，正确的是_。 A.数组中各个控件具有相同的名称 B.数组中可包含不同类型的控件 C.数组中各个控件具有相同的 Index 属性值 D.数组元素不同，可以响应的事件也不同（分数：3.00）A.B.C.D.15.以下关于 VB 文件的叙述中，错误的是_。 A.标准模块文件不属于任何一个窗体 B.工程文件的扩展名为.frm C.一个工程只有一个工程文件 D.一个工程可以有多个窗体文件（分数：3.00）A.B.C.D.16.设 x 为一整型变量，且情况语句的开始为：Select Case x，则不符合语法规则的 Case 子句是_。 A.Case Is20 B.Case 1 To 10 C.Case
6、 0Is And IS20 D.Case 2,3,4（分数：2.00）A.B.C.D.17.现有如下语句：x=IIf (a50,Int (a/3),a Mod 2)当 a=52 时，x 的值是_。 A.0 B.1 C.17 D.18（分数：2.00）A.B.C.D.18.设有如下数组定义语句：Dim a(-1 To 4,3)As Integer以下叙述中正确的是_。 A.a 数组有 18 个数组元素 B.a 数组有 20 个数组元素 C.a 数组有 24 个数组元素 D.语法有错（分数：2.00）A.B.C.D.19.以下叙述中错误的是_。 A.Sub Main 是定义在标准模块中的特定过程
7、B.一个工程中只能有一个 Sub Main 过程 C.Sub Main 过程不能有返回值 D.当工程中含有 Sub Main 过程时，工程执行时一定最先执行该过程（分数：2.00）A.B.C.D.20.关于随机文件，以下叙述中错误的是_。 A.使用随机文件能节约空间 B.随机文件记录中，每个字段的长度是固定的 C.随机文件中，每个记录的长度相等 D.)随机文件的每个记录都有一个记录号（分数：2.00）A.B.C.D.21.在名称为 Framel 的框架中，有两个名称分别为 op1、op2 的单选按钮，标题分别为“单程”、“往返”，如图所示。（分数：2.00）A.B.C.D.22.以下能够设置控
8、件焦点的方法是_。 A.SetFocus B.GotFocus C.LostFocus D.TabStop（分数：2.00）A.B.C.D.23.使用 Line 控件在窗体上画一条从(0，0)到(600，700)的直线，则其相应属性的值应是_。 A.X1=0，X2=600，Y1=0，Y2=700 B.Y1=0，Y2=600，X1=0，X2=700 C.X1=0，X2=0，Y1=600，Y2=700 D.Y1=0，Y2=0，X1=600，X2=700（分数：2.00）A.B.C.D.24.设有窗体的 Form MouseMove 事件过程如下：Private Sub Form MouseMove
9、 (Button As Integer,Shift As Integer,XAs Single,Y As Single)If (Button And 3)=3 ThenPrint“检查按键“End IfEnd Sub关于上述过程，以下叙述中正确的是_。 A.按下鼠标左键时，在窗体上显示“检查按键” B.按下鼠标右键时，在窗体上显示“检查按键” C.同时按下鼠标左、右键时，在窗体上显示“检查按键” D.不论做何种操作，窗体上都不会显示（分数：2.00）A.B.C.D.25.窗体上有一个名称为 CD1 的通用对话框，一个名称为 Commandl 的命令按钮，相应的事件过程如下：Private Su
10、b Commandl_ Click()CD1.Filter=“All File|*.*|Text File|*.txt|PPT*.ppt“CD1.Filterlndex=2CD1.InitDir=“C:“CD1.FileName=“default“CD1.ShowSaveEnd Sub关于上述过程，以下叙述中正确的是_。 A.默认过滤器为“*.ppt” B.指定的初始目录为“C:/” C.打开的文件对话框的标题为“default” D.上面事件过程实现保存文件的操作（分数：2.00）A.B.C.D.26.以下关于窗体的叙述中，错误的是_。 A.Hide 方法能隐藏窗体，但窗体仍在内存中 B.使
11、用 Show 方法显示窗体时，一定触发 Load 事件 C.移动或放大窗体时，会触发 Paint 事件 D.双击窗体时，会触发 DblClick 事件（分数：2.00）A.B.C.D.27.下列控件中，没有 Caption 属性的是_。 A.单选按钮 B.复选框 C.列表框 D.框架（分数：2.00）A.B.C.D.28.将数据项“Student”添加到名称为 List1 的列表框中，并使其成为列表框第一项的语句为_。 A.List1.Addltem“Student“,0 B.List1.Addltem“Student“,1 C.List1.Addltem 0,“Student“ D.List
12、1.Addltem 1,“Student“（分数：2.00）A.B.C.D.29.下列针对框架控件的叙述中，错误的是_。 A.框架是一个容器控件 B.框架也有 Click 和 DblClick 事件 C.框架也可以接受用户的输入 D.使用框架的主要目的是为了对控件进行分组（分数：2.00）A.B.C.D.30.若窗体上有一个名为 Commandl 的命令按钮，并有下面的程序：Private Sub Commandl_Click ()Dim arr (5) As IntegerFor k=1 To 5arr (k)=kNext kprog arr()For k=1 To 5Print arr (
13、k)；Next kEnd SubSub prog(a()As Integer)n=UBound (a)For i=n To 2 step-1For j=1 To n-1if a(j)a(j+1)Thent=a(j):a(j)=a(j+1):a(j+1)=tEnd IfNext jNext iEnd Sub程序运行时，单击命令按钮后显示的是_。 A.1 2 3 4 5 B.5 4 3 2 1 C.0 1 2 3 4 D.4 3 2 1 0（分数：2.00）A.B.C.D.31.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是_。Private Sub
14、 Commandl_Click()Dim count (25) As Integer,ch As Stringch-UCase(InputBox(“请输入字母字符串”)For k=1 To Len(ch)n=Asc (Mid (ch,k,1)-Asc(“A“)If n=0 Thencount (n)=count (n)+1End IfNext km=count (0)For k=1 To 25If mcount (k) Thenm=count (k)End IfNext kPrint mEnd Sub A.0 B.1 C.2 D.3（分数：2.00）A.B.C.D.32.在窗体上画一个命令按钮
15、和一个文本框，其名称分别为 Commandl 和 Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：Private Sub Commandl_Click()a=InputBox(“Enter an integer“)b=Text1.TextText1.Text=b+aEnd Sub程序运行后，在文本框中输入 456，然后单击命令按钮，在输入对话框中输入 123，则文本框中显示的内容是_。 A.579 B.123 C.456123 D.456（分数：2.00）A.B.C.D.33.在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写
16、如下事件过程：Private Sub Commandl_Click()Dim i As Integer,n As IntegerFor i-0 To 50i=i+3n=n+1If i10 Then Exit ForNextText1.Text=Str (n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是_。 A.2 B.3 C.4 D.5（分数：2.00）A.B.C.D.34.设有如下的程序段：n=0For i=1 To 3For j=1 To iFor k=j To 3n=n+1Next kNext jNext i执行上面的程序段后，n 的值为_。 A.3 B.21 C.9 D
17、.14（分数：2.00）A.B.C.D.35.在窗体上画一个名称为 Commandl 的命令按钮，一个名称为 Label1 的标签，然后编写如下事件过程：Private Sub Commandl_Click()s=0For i=1 To 15x=2*i-1If x Mod 3=0 Then s=s+1Next iLabel1.Caption=sEnd Sub程序运行后，单击命令按钮，则标签中显示的内容是_。 A.1 B.5 C.27 D.45（分数：2.00）A.B.C.D.36.阅读程序：Private Sub Form_Click()x=50For i=1 To 4y=InputBox(“
18、请输入一个整数“)y=Val (y)If y Mod 5=0 Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入 15、24、35、46，输出结果为_。 A.100 B.50 C.120 D.70（分数：3.00）A.B.C.D.37.在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Sub Commandl_Click ()Dim arrayl(10,10)As IntegerDim i As Integer,j As Intege
19、rFor i=1 To 3For j=2 To 4arrayl(i,j)=i+jNext jNext iText1.Text=arrayl(2,3)+arrayl(3,4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是_。 A.15 B.14 C.13 D.12（分数：3.00）A.B.C.D.38.在窗体上画一个名称为 Commandl 的命令按钮，然后编写如下程序：Option Base 1Private Sub Commandl_Click()d=0c=10x=Array(10,12,21,32,24)For i=1 To 5If x(i)c Thend=d+x(i)c=x
20、(i)Elsed=d-cEnd IfNext iPrint dEnd Sub程序运行后，如果单击命令按钮，则在窗体上输出的内容为_。 A.89 B.99 C.23 D.77（分数：3.00）A.B.C.D.39.假定有以下通用过程：Function Fun(n As Integer)As Integerx=n*nFun=x-11End Function在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下事件过程：Private Sub Commandl_Click()Dim i As IntegerFor i=1 To 2y=Fun (i)Print y;Next iEnd Sub
21、程序运行后，单击命令按钮，在窗体上显示的内容是_。 A.1 3 B.10 8 C.-10 -7 D.0 5（分数：3.00）A.B.C.D.40.设有如下通用过程：Public Function f(x As Integer)Dim y As Integerx=20y=2f=x*yEnd Function在窗体上画一个命令按钮，其名称为 Commandl，然后编写如下事件过程：Private Sub Commandl_Click ()Static x As Integerx=10y=5y=f(x)Print x;yEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是_。 A.10
22、 5 B.20 40 C.20 5 D.10 40（分数：3.00）A.B.C.D.二级 VISUAL+BASIC-52 (1)答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：40，分数：100.00)1.下列叙述中正确的是_。 A.算法就是程序 B.设计算法时只需要考虑数据结构的设计 C.设计算法时只需要考虑结果的可靠性 D.以上三种说法都不对（分数：3.00）A.B.C.D. 解析：解析 算法是指解题方案的准确而完整的描述，算法不等于程序，也不等于计算方法，所以 A 错误。设计算法时不仅要考虑对数据对象的运算和操作，还要考虑算法的控制结构。2.下列叙述中正确的
23、是_。 A.有一个以上根结点的数据结构不一定是非线性结构 B.只有一个根结点的数据结构不一定是线性结构 C.循环链表是非线性结构 D.双向链表是非线性结构（分数：3.00）A.B. C.D.解析：解析 线性结构应满足：有且只有一个根结点与每个结点最多有一个前件，也最多有一个后件，所以 B 正确。所以有一个以上根结点的数据结构一定是非线性结构，所以 A 错误。循环链表和双向链表都是线性结构的数据结构。3.下列关于二叉树的叙述中，正确的是_。 A.叶子结点总是比度为 2 的结点少一个 B.叶子结点总是比度为 2 的结点多一个 C.叶子结点数是度为 2 的结点数的两倍 D.度为 2 的结点数是度为
24、1 的结点数的两倍（分数：3.00）A.B. C.D.解析：解析 根据二叉树的基本性质 3：在任意一棵二叉树中，度为 0 的叶子结点总是比度为 2 的结点多一个。所以选择 B。4.软件生命周期中的活动不包括_。 A.市场调研 B.需求分析 C.软件测试 D.软件维护（分数：3.00）A. B.C.D.解析：解析 软件生命周期可以分为软件定义、软件开发与软件运行维护三个阶段。主要活动阶段是：可行性研究与计划阶段，需求分析，软件设计，软件实现，软件测试，运行和维护，所以选择 A。5.某系统总体结构图如下图所示：该系统总体结构图的深度是_。（分数：3.00）A.B.C. D.解析：解析 根据总体结构
25、图可以看出该树的深度为 3，比如：XY 系统一功能 2-功能 2.1，就是最深的度数的一个表现。6.程序调试的任务是_。 A.设计测试用例 B.验证程序的正确性 C.发现程序中的错误 D.诊断和改正程序中的错误（分数：3.00）A.B.C.D. 解析：解析 程序调试的任务是诊断和改正程序中的错误。7.下列关于数据库设计的叙述中，正确的是_。 A.在需求分析阶段建立数据字典 B.在概念设计阶段建立数据字典 C.在逻辑设计阶段建立数据字典 D.在物理设计阶段建立数据字典（分数：3.00）A. B.C.D.解析：解析 数据字典是在需求分析阶段建立，在数据库设计过程中不断修改、充实和完善的。8.数据库
26、系统的三级模式不包括_。 A.概念模式 B.内模式 C.外模式 D.数据模式（分数：3.00）A.B.C.D. 解析：解析 数据库系统的三级模式是概念模式、外模式和内模式，所以选择 D。9.有三个关系 R，S 和 T 如下：则由关系 R 和 S 得到关系 T 的操作是_。（分数：3.00）A. B.C.D.解析：解析 自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以根据 T 中元组可以判断 R 和 S 做的是自然连接操作。10.下列选项中属于面向对象设计方法主要特征的是_。 A.继承 B.自顶向下 C.模块化 D.逐步求精（分
27、数：3.00）A. B.C.D.解析：解析 面向对象基本方法的基本概念有对象、类和实例、消息、继承与多态性，所以选择 A。11.以下合法的 VB 变量名是_。 A.#_1 B.123_a C.string D.x_123（分数：3.00）A.B.C.D. 解析：解析 VB 中变量的命名规则为：必须以字母或汉字开头由字母、汉字、数字或下划线组成不能使用 VB 已经占用的关键字。#_1 中#是类型符号，变量名中不能用 VB 保留符号。故不合法。123_a 以数字开头不合法。string 是 VB 的关键字，也不合法。故 D 选项正确。12.以下关于 VB 的叙述中，错误的是_。 A.VB 采用事件
28、驱动方式运行 B.VB 既能以解释方式运行，也能以编译方式运行 C.VB 程序代码中，过程的书写顺序与执行顺序无关 D.VB 中一个对象对应一个事件（分数：3.00）A.B.C.D. 解析：解析 VB 中一个对象可以对应一个或多个事件，事件可由用户或系统触发，触发后执行相应的事件过程。不过，不一定一个对象的所有事件过程都执行，响应哪个事件过程就执行哪个。故 D 选项错误。13.有如下数据定义语句：Dim X,Y As Integer以上语句表明_。 A.X、Y 均是整型变量 B.X 是整型变量，Y 是变体类型变量 C.X 是变体类型变量，Y 是整型变量 D.X 是整型变量，Y 是字符型变量（分
29、数：3.00）A.B.C. D.解析：解析 用 Dim 可同时定义多个变量，但变量要分别声明其数据类型，如果不声明数据类型，默认是 Variant 变体型变量。 本题中，变量 X 定义时没声明数据类型，所以为 Variant 型变量，变量 Y 是整型变量。故 C 选项正确。14.以下关于控件数组的叙述中，正确的是_。 A.数组中各个控件具有相同的名称 B.数组中可包含不同类型的控件 C.数组中各个控件具有相同的 Index 属性值 D.数组元素不同，可以响应的事件也不同（分数：3.00）A. B.C.D.解析：解析 控件数组中各控件具有相同的名称，而且类型是相同的，但 Index 属性值不同。
30、数组中各控件响应的事件是相同，用 Index 属性值来区分每个控件。故 A 选项正确，B、C、D 选项错误。15.以下关于 VB 文件的叙述中，错误的是_。 A.标准模块文件不属于任何一个窗体 B.工程文件的扩展名为.frm C.一个工程只有一个工程文件 D.一个工程可以有多个窗体文件（分数：3.00）A.B. C.D.解析：解析 工程文件的扩展名为.vbp，故 B 选项错误。16.设 x 为一整型变量，且情况语句的开始为：Select Case x，则不符合语法规则的 Case 子句是_。 A.Case Is20 B.Case 1 To 10 C.Case 0Is And IS20 D.Ca
31、se 2,3,4（分数：2.00）A.B.C. D.解析：解析 Select Case 语句中表达式的形式可以是：常量或变量；若干符合条件的值用“,”隔开；表达式 1 to 表达式 2；Is 关系表达式。 本题中选项 A、B 和 D 都符合语法规则。 选项 C 中 Is 关系表达式语法错误，它可以是 Is0 或 Is20，但不能是组合的 0Is And Is20，故 C 选项错误。17.现有如下语句：x=IIf (a50,Int (a/3),a Mod 2)当 a=52 时，x 的值是_。 A.0 B.1 C.17 D.18（分数：2.00）A.B.C. D.解析：解析 首先计算 Int (a
32、/3)即 Int (52/3)=Int (17)=17，52 MOD 2 结果为 0。 再计算 IIf (5250,17,0)，5250 结果为 True，所以 IIF 函数返回 17，则 x 值为 17，故选 C。18.设有如下数组定义语句：Dim a(-1 To 4,3)As Integer以下叙述中正确的是_。 A.a 数组有 18 个数组元素 B.a 数组有 20 个数组元素 C.a 数组有 24 个数组元素 D.语法有错（分数：2.00）A.B.C. D.解析：19.以下叙述中错误的是_。 A.Sub Main 是定义在标准模块中的特定过程 B.一个工程中只能有一个 Sub Main
33、 过程 C.Sub Main 过程不能有返回值 D.当工程中含有 Sub Main 过程时，工程执行时一定最先执行该过程（分数：2.00）A.B.C.D. 解析：解析 VB 工程的启动对象有：Sub Main 过程(在标准模块中定义)、窗体(在多个窗体可选一个窗体启动)，我们可以通过在“工程属性”对话框中设置启动对象来实现，设置哪个就用哪个启动。所以当工程中含有 Sub Main 过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项 D 错误。20.关于随机文件，以下叙述中错误的是_。 A.使用随机文件能节约空间 B.随机文件记录中，每个字段的长度是固定的 C.随机文件中，每个记录
34、的长度相等 D.)随机文件的每个记录都有一个记录号（分数：2.00）A. B.C.D.解析：解析 随机文件中的每一行是一条记录，每条记录的长度是固定的、相等的，并且都有一个记录号。Open 语句中的 Len 用于指定记录长度，当指定长度小于记录实际长度时将产生错误；大于实际长度时，可以写入，但浪费空间，所以随机文件占据磁盘空间较大，故选项 A 错误。21.在名称为 Framel 的框架中，有两个名称分别为 op1、op2 的单选按钮，标题分别为“单程”、“往返”，如图所示。（分数：2.00）A.B. C.D.解析：解析 当 Framel 的 Enabled 属性设为 False 后，框架 Fr
35、amel 变为不可用，它里面放的两个单项按钮也就变为不可用，故 A 选项错误； 当 Op1.Value 为 False 时，“单程”和“往返”单项按钮都处于未选中状态，故 C 选项错误； Op1.Value 的值为 0，即为 False，语句正确，没有程序错误，故 D 选项说法错误： 根据图可只，“单程”单选按钮处于选中状态，Op1.Value 的值为 True，故 B 选项正确。22.以下能够设置控件焦点的方法是_。 A.SetFocus B.GotFocus C.LostFocus D.TabStop（分数：2.00）A. B.C.D.解析：解析 GotFocus 和 LostFocus
36、是控件获得焦点和失去焦点时触发的两个事件；TabStop 是控件的属性；SetFocus 方法是控件设置、获得焦点的方法。故选 A。23.使用 Line 控件在窗体上画一条从(0，0)到(600，700)的直线，则其相应属性的值应是_。 A.X1=0，X2=600，Y1=0，Y2=700 B.Y1=0，Y2=600，X1=0，X2=700 C.X1=0，X2=0，Y1=600，Y2=700 D.Y1=0，Y2=0，X1=600，X2=700（分数：2.00）A. B.C.D.解析：解析 X1、Y1、X2、Y2 属性是直线的起点、终点坐标。故选 A。24.设有窗体的 Form MouseMove
37、 事件过程如下：Private Sub Form MouseMove (Button As Integer,Shift As Integer,XAs Single,Y As Single)If (Button And 3)=3 ThenPrint“检查按键“End IfEnd Sub关于上述过程，以下叙述中正确的是_。 A.按下鼠标左键时，在窗体上显示“检查按键” B.按下鼠标右键时，在窗体上显示“检查按键” C.同时按下鼠标左、右键时，在窗体上显示“检查按键” D.不论做何种操作，窗体上都不会显示（分数：2.00）A. B.C.D.解析：25.窗体上有一个名称为 CD1 的通用对话框，一个名
38、称为 Commandl 的命令按钮，相应的事件过程如下：Private Sub Commandl_ Click()CD1.Filter=“All File|*.*|Text File|*.txt|PPT*.ppt“CD1.Filterlndex=2CD1.InitDir=“C:“CD1.FileName=“default“CD1.ShowSaveEnd Sub关于上述过程，以下叙述中正确的是_。 A.默认过滤器为“*.ppt” B.指定的初始目录为“C:/” C.打开的文件对话框的标题为“default” D.上面事件过程实现保存文件的操作（分数：2.00）A.B. C.D.解析：解析 通用对
39、话框的 Filterlndex 属性为 1 时表示默认过滤器为第 1 个文件类型，为 2 时表示为第 2 个文件类型。InitDir 属性值指定通用对话框的初始目录。FileName 属性表示对话框中默认的文件名。ShowSave 方法表示打开另存为对话框，执行保存文件的操作。26.以下关于窗体的叙述中，错误的是_。 A.Hide 方法能隐藏窗体，但窗体仍在内存中 B.使用 Show 方法显示窗体时，一定触发 Load 事件 C.移动或放大窗体时，会触发 Paint 事件 D.双击窗体时，会触发 DblClick 事件（分数：2.00）A.B. C.D.解析：解析 窗体的 Load 事件是把窗
40、体装入工作区的事件，即装入内存，然后窗体才显示出来，使用Hide 方法可以使窗体隐藏，但窗体仍在内存中，使用 Show 方法能使窗体显示出来。当窗体被移动或放大时，或者窗口移动时覆盖了一个窗体时，触发 Paint 事件。双击窗体时会触发窗体的 DblClick 事件。27.下列控件中，没有 Caption 属性的是_。 A.单选按钮 B.复选框 C.列表框 D.框架（分数：2.00）A.B.C. D.解析：解析 列表框控件没有 Caption 属性。28.将数据项“Student”添加到名称为 List1 的列表框中，并使其成为列表框第一项的语句为_。 A.List1.Addltem“Stud
41、ent“,0 B.List1.Addltem“Student“,1 C.List1.Addltem 0,“Student“ D.List1.Addltem 1,“Student“（分数：2.00）A. B.C.D.解析：解析 List 控件的 Addltem 方法的语法是：Addltem (String,index)。其中 index 是列表框中列表项的索引值，第一项的索引值为 0。29.下列针对框架控件的叙述中，错误的是_。 A.框架是一个容器控件 B.框架也有 Click 和 DblClick 事件 C.框架也可以接受用户的输入 D.使用框架的主要目的是为了对控件进行分组（分数：2.00）
42、A.B.C. D.解析：解析 框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是 Click 和 DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。30.若窗体上有一个名为 Commandl 的命令按钮，并有下面的程序：Private Sub Commandl_Click ()Dim arr (5) As IntegerFor k=1 To 5arr (k)=kNext kprog arr()For k=1 To 5Print arr (k)；Next kEnd SubSub prog(a()As Integer)n=UBound (a)For i=n To
43、2 step-1For j=1 To n-1if a(j)a(j+1)Thent=a(j):a(j)=a(j+1):a(j+1)=tEnd IfNext jNext iEnd Sub程序运行时，单击命令按钮后显示的是_。 A.1 2 3 4 5 B.5 4 3 2 1 C.0 1 2 3 4 D.4 3 2 1 0（分数：2.00）A.B. C.D.解析：解析 程序对数组元素赋初值为 1、2、3、4、5。Ubound 函数返回数组可用的最大下标，过程prog 的功能是遍历数组对数组中的元素进行排序，由条件 a(j)a(j+1)可知程序是将数组按从大到小排序。当用数组作为过程的参数时，使用的是“
44、传地址”方式，因此程序输出的是排序后的数组元素值，即5、4、3、2、1。31.下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是_。Private Sub Commandl_Click()Dim count (25) As Integer,ch As Stringch-UCase(InputBox(“请输入字母字符串”)For k=1 To Len(ch)n=Asc (Mid (ch,k,1)-Asc(“A“)If n=0 Thencount (n)=count (n)+1End IfNext km=count (0)For k=1 To 25If
45、mcount (k) Thenm=count (k)End IfNext kPrint mEnd Sub A.0 B.1 C.2 D.3（分数：2.00）A.B.C.D. 解析：解析 根据题中的程序代码可知，ch 为输入字符串的大写状态，第一个 For 循环是依次取出字母，n 为取出字母与“A”字符的 ASCII 码差值，然后再赋给数组 count()；第二个 For 循环是找出数组count()中的最小值，因此，最后窗体上输出的结果为 3，即选项 D。32.在窗体上画一个命令按钮和一个文本框，其名称分别为 Commandl 和 Text1，把文本框的 Text 属性设置为空白，然后编写如下事
46、件过程：Private Sub Commandl_Click()a=InputBox(“Enter an integer“)b=Text1.TextText1.Text=b+aEnd Sub程序运行后，在文本框中输入 456，然后单击命令按钮，在输入对话框中输入 123，则文本框中显示的内容是_。 A.579 B.123 C.456123 D.456（分数：2.00）A.B.C. D.解析：解析 默认情况下，InputBox 的返回值是一个字符串，因此程序中 a=“123”，b=“456”，b+a=“456”+“123”=“456123”。因此 C 选项正确。另外，使用字符连接运算符“+”时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报“类型不匹配”的错误。33.在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Sub Com
