1、二级 VISUAL+BASIC 笔试-388 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.算法的时间复杂度是指_。A) 算法所处理的数据量 B) 算法的执行时间C) 算法在执行过程中所需要的基本运算次数 D) 算法程序中语句或指令条数（分数：2.00）A.B.C.D.2.数据的存储结构是指_。A) 存储在外存中的数据 B) 数据所占的存储空间C) 数据在计算机中的顺序存储方式 D) 数据的逻辑结构在计算机中的表示（分数：2.00）A.B.C.D.3.下列关于队列的叙述正确的是_。A) 队列按“先进后出“原则组织数据 B) 队列属于非线性
2、表C) 队列在队尾删除数据 D) 队列按“先进先出“原则组织数据（分数：2.00）A.B.C.D.4.对长度为 n 的线性表排序，在最坏情况下，比较次数是 nlog2n 的排序方法是_。A) 快速排序 B) 冒泡排序C) 直接插入排序 D) 堆排序（分数：2.00）A.B.C.D.5.下列描述中正确的是_。A) 软件工程只是解决软件项目的管理问题B) 软件工程主要解决软件产品的生产率问题C) 软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D) 软件工程只是解决软件开发中的技术问题（分数：2.00）A.B.C.D.6.在软件设计中，不属于过程设计工具的是_。A) PDL B) DFD
3、 图 C) PAD 图 D) N-S 图（分数：2.00）A.B.C.D.7.软件(程序)调试的目的是_。A) 诊断和改正程序中的错误 B) 尽可能多地发现程序中的错误C) 发现并改正程序中的所有错误 D) 确定程序中错误的性质（分数：2.00）A.B.C.D.8.数据库系统的核心是_。A) 数据库 B) 数据库管理系统C) 数据库管理员 D) 数据库应用系统（分数：2.00）A.B.C.D.9.在关系数据库中，用来表示实体之间联系的是_。A) 二维表 B) E-R 图 C) 元组 D) 文件（分数：2.00）A.B.C.D.10.设有如下三个关系表（分数：2.00）A.B.C.D.11.设
4、a=3，b=5，c=2，d=6，则下面语句输出的是_。Print45 * b Or a=c And bc Or cdA) False B) 1 C) True D) -1（分数：2.00）A.B.C.D.12.以下合法的 Visual Basic 标识符是_。A) a#x B) Const C) 9abc D) ForLoop（分数：2.00）A.B.C.D.13.为使程序运行时通用对话框 CD1 上显示的标题为“通用对话框窗口“，若通过程序设置该标题，则应使用的语句是_。A) CD1.Action=“通用对话框窗口“ B) CD1.Filter=“通用对话框窗口“C) CD1.FileNam
5、e=“通用对话框窗口“ D) CD1.DialogTitle=“通用对话框窗口/（分数：2.00）A.B.C.D.14.可以产生 3050(含 30 和 50)之间的随机整数的表达式是_。A) Int(Rnd*21+30) B) Int(Rnd*20+30)C) Int(Rnd*50-Rnd*30) D) Int(Rnd*30+50)（分数：2.00）A.B.C.D.15.设窗体上有一个名称为 HS1 的水平滚动条，如果执行了语句：HS1.Value=(HS1.Max-HS1.Min)/2+HS1.Min 则_.A) 滚动块处于最左端B) 滚动块处于最右端C) 滚动块处于中间位置D) 滚动块可
6、能处于任何位置，具体位置取决于 Max、Min 属性的值（分数：2.00）A.B.C.D.16.下列叙述中正确的是_。A) MsgBox 语句的返回值类型是字符串B) MsgBox 语句的第一个参数不能省略C) 如果省略 MsgBox 语句的第三个参数(Title)，则信息框的标题为空D) 执行 MsgBox 语句并出现信息框后，不用关闭信息框即可执行其他操作（分数：2.00）A.B.C.D.17.窗体上有一个名称为 Frame1 的框架(如图)，若要把框架上显示的“Frame1“改为汉字“框架控件“，下面正确的语句是_。（分数：2.00）A.B.C.D.18.要获得当前驱动器，应使用驱动器列
7、表框的属性是_。A) Path B) Drive C) Dir D) Pattern（分数：2.00）A.B.C.D.19.在窗体上画两个单选按钮，名称分别为 Option1、Option2，标题分别为“宋体“和“黑体“；一个复选框，名称为 Check1，标题为“粗体“；一个文本框，名称为 Text1，Text 属性为“改变文字字体“。要求程序运行时，“宋体“单选按钮和“粗体“复选框被选中(窗体外观如下图所示)，则能够实现上述要求的语句序列是_。（分数：2.00）A.B.C.D.20.窗体上有 Command1、Command2 两个命令按钮。现编写以下程序：Option Base 0Dim
8、a()As Integer,m As IntegerPrivate Sub Command1_Click()m=InputBox(“请输入一个正整数“)ReDim a(m)End SubPrivate Sub Command2_Click()m=InputBox(“请输入一个正整数“)ReDim a(m)End Sub运行程序时，单击 Command1 后输入整数 8，再单击 Command2 后输入整数 4，则数组 a 中元素的个数是_。A) 4 B) 5 C) 8 D) 9（分数：2.00）A.B.C.D.21.以下数组定义语句中，错误的是_。A) Dim arr(-5) As Integ
9、er B) Static arr(5)C) Dim arr(2,1 To 3) D) Dim arr(0 To 2,1 To 3)As Integer（分数：2.00）A.B.C.D.22.在窗体上画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i=3 To 1 Step-0.4Ptint Int(i)；Next iEnd Sub运行程序，单击命令按钮，窗体上显示的内容为_。A) 3 2 2 2 1 1 B) 3 2 2 1 1 1C) 3 2 2 1 1 D) 3 2 1 1 1（分数：2.00）A.B.C.D.23.下面程序的输出结果是_
10、。Private Sub Command1_Click()ch $=“ABCDEF“proc ch: Print chEnd SubPrivate Sub proc(ch As String)s=“ “Fork=Len(ch) To 1 Step-1s=sMid(ch,k,1)Next kch=sEnd SubA) ABCDEF B) FEDCBA C) A D) F（分数：2.00）A.B.C.D.24.执行下列程序后，鼠标单击窗体，输出结果为_。Private Sub Form_Click()Print“Click“：End SubPrivate Sub Form_MouseDown(Bu
11、tton As Integer,Shift As Integer,X As Single,Y As Single)Print“Down“End SubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)Print “Up“End SubA) DownUpClick B) ClickDownUpC) DownClickUp D) UpDownClick（分数：2.00）A.B.C.D.25.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编
12、写如下事件过程：Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i=0 To 100i=1+5n=n+1If i20 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是_。A) 2 B) 3 C) 4 D) 5（分数：2.00）A.B.C.D.26.窗体上有一个名称为 Text1 的文本框；一个名称为 Timer1 的计时器控件，其 Interval 属性值为2000,Enabled 属性值是 True。Timer1 的事件过程如下：Priva
13、te Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then flag=1flag=-flagIf flag=1 ThenText1.ForeColor=HFFHFF为红色ElseText1.ForeColor=HC000HC000为绿色End IfEnd Sub以下叙述中正确的是_。A) flag 的值只可能取 0 或 1B) 程序有逻辑错误，Else 分支总也不能被执行C) 每次执行此事件过程时，flag 的初始值均为 1D) 程序执行后，文本框中的文字每 2 秒改变一次颜色（分数：2.00）A.B.C.D.27.在窗体上有一个名称为
14、CommonDialog1 的通用对话框和一个名称为 Command1 的命令按钮，以及其他一些控件。要求在程序运行时，单击 Command1 按钮，则显示打开文件对话框，并在选择或输入了一个文件名后，就可以打开该文件。以下是 Command1_Click 事件过程的两种算法。算法 1：Private Sub Command1_Click()CommonDialog1.ShowOpenOpen CommonDialog1.FileName For Input As#1End Sub算法 2：Private Sub Command1_Click()CommonDialog1.ShowOpenIf
15、 CommonDialog1.FileName“ “ThenOpen CommonDialog1.FileName For Input As#1End IfEnd Sub下面关于这两种算法的叙述，正确的是_。A) 显示打开文件对话框后若未选择或输入任何文件名，则算法 2 出错，算法 1 不会B) 显示打开文件对话框后若未选择或输入任何文件名，则算法 1 出错，算法 2 不会C) 两种算法的执行结果完全一样D) 算法 1 允许输入的文件名中含有空格，而算法 2 不允许（分数：2.00）A.B.C.D.28.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private
16、Function fun1(n As Integer) As IntegerDim k As IntegerIf n=1 Thenk=1Elsek=1+fun1(n-1)*2End Iffun1=kEnd FunctionPrivate Sub Command1_Click()Dim m As Integer,x As Integerx=4m=fun1(x)Print mEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是_。A) 4 B) 6 C) 9 D) 15（分数：2.00）A.B.C.D.29.以下关于过程及过程参数的描述中，错误的是_。A) 窗体可以作为过程的参数B) 过程
17、的参数可以是控件名称C) 调用过程时使用的实参的个数应与过程形参的个数相同D) 只有函数过程能够将过程中处理的信息返回到调用程序中（分数：2.00）A.B.C.D.30.要求当鼠标在图片框 Pl 中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是_。A) Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)P1.Print X,YEnd SubB) Private Sub P1_MouseMove(Button As Integer,Sluft A
18、s Integer,X As Single,Y As Single)P1.PrintX,YEnd SubC) Private Sub P1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)Print X,YEnd SubD) Private Sub P1_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)Picture，Print X.YEnd Sub（分数：2.00）A.B.C.D.31.窗体上有一个名为 Comma
19、nd1 的命令按钮，并有下面的程序：Private Sub Command1_Click()Dim arr(6) As IntegerFor k=1 To 6arr(k)=kNext kprog arr()For k=1 To 6Print arr(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) 0
20、 1 2 3 4 5 B) 1 2 3 4 5 6C) 5 4 3 2 1 0 D) 6 5 4 3 2 1（分数：2.00）A.B.C.D.32.下列有关文件的叙述中，错误的是_。A) 在随机文件中，每个记录的长度是固定的B) 以 Append 方式打开的文件，既可以进行读操作，也可以进行写操作C) 以 Output 方式打开一个不存在的文件时，系统会自动建立一个文件再打开D) 不管是顺序文件还是随机文件，其打开的语句和打开方式都是不相同的（分数：2.00）A.B.C.D.33.在窗体上画两个命令按钮，名称分别为 Command1、Command2，并编写如下程序：Const n=5，m=4
21、Dim a(m，n)Private Sub Command1_Click()k=1For i=1 To mForj=1 To na(i，j)=kk=k+lNext jNext iEnd SubPrivate Sub Command2_Click()summ=0For i=1 To mFor j=1 To nIf i=1 Or i=m Thensumm=summ+a(i，j)ElseIf j=1 Or j=n Thensumm=summ+a(i，j)End IfEnd IfNext jNext iPrint summEnd Sub过程 Command1_Click()的作用是在二维数组 a 中存
22、放一个 m 行 n 列的矩阵；过程 Command2_Click()的作用是_。A) 计算矩阵外围一圈元素的累加和B) 计算矩阵除外围一圈以外的所有元素的累加和C) 计算矩阵第一列和最后一列元素的累加和D) 计算矩阵第一行和最后一行元素的累加和（分数：2.00）A.B.C.D.34.某人编写了下面的程序：Private Sub Command1_Click()Dim a As Integer,b As Integera=InputBox(“请输入整数“)b=InputBox(“请输入整数“)pro apro bCall pro(a+b)End SubPrivate Sub pro(n As I
23、nteger)While(n0)Print n Mod 10：n=n/10WendPrintEnd Sub此程序功能是：输入 2 个正整数，反序输出这 2 个数的每一位数字，再反序输出这 2 个数之和的每一位数字。例如，若输入 123 和 234，则应该输出：3 2 14 3 27 5 3但调试时发现只输出了前 2 行(即 2 个数的反序)，而未输出第 3 行(即 2 个数之和的反序)，程序需要修改。下面的修改方案中正确的是_。A) 把过程 pro 的形式参数“n As Integer“改为“ByVal n As Integer“B) 把“Call pro(a+b)“改为“pro a+b“C)
24、 把“n=n/10“改为“n=n/10“D) 在 pro b 语句之后增加语句 c%=a+b，再把“Call pro(a+b)“改为“pro c/（分数：2.00）A.B.C.D.35.窗体如图 1 所示。要求程序运行时，在文本框 Text1 中输入一个姓氏，单击“删除“按钮(名称为Command1)，则可删除列表框 List1 中所有该姓氏的项目。若编写以下程序来实现此功能：Private Sub Command1_Click()Dim n%,k%n=Len(Text1.Text)For k=0 To List1.ListCount-1If Left(List1.List(k),n)=Tex
25、t1.Text ThenList1.RemoveItem kEnd IfNext kEnd Sub在调试时发现，如输入“陈“，可以正确删除所有姓“陈“的项目，但输入“刘“，则只删除了“刘邦“、“刘备“2 项，结果如图 2 所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把 For k=0 To List1.ListCount-1 改为_。（分数：2.00）A.B.C.D.二、填空题(总题数：10，分数：30.00)36.对下列二叉树进行前序遍历的结果为_。（分数：2.00）填空项 1:_37.结构化程序设计的基本原则包括 1、逐步求精、模块化和限制使用 goto 语句。（分数：2.
26、00）填空项 1:_38.数据流图是描述数据在软件中的流动和变换的过程，而对数据流图中所包含的元素的定义则是 1。（分数：2.00）填空项 1:_39.在 E-R 图中， 1 表示实体间的联系。（分数：2.00）填空项 1:_40.在职员管理关系数据库中，存取一个职员信息的数据单位是 1。（分数：2.00）填空项 1:_41.有如下函数过程：Function gys(By Val x As Integer, ByVal y As Integer) As IntegerDo While y0preminder=x/yx=Yy=preminderLoopgys=xEnd Function以下是调用
27、该函数的事件过程：Private Sub Command1_ClickDim a As Integer,b As Integera=10；b=2x=gys(a，b)Print xEnd Sub该程序的运行结果是_。（分数：2.00）填空项 1:_在窗体上画一个名称为 Combo1 的组合框，然后画两个名称分别为 Label1、Label2，标题分别为“城市名称“和空白的标签。程序运行后，在组合框中输入一个新项目并按 Enter 键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在 Label2 中给出提示“已成功添加新输入项。“，如下图所示。如果输入的项目已存在，则在
28、 Label2 中给出提示“输入项已在组合框中。“。请填空。（分数：4.00）填空项 1:_填空项 1:_工程中有 Form1、Form2 两个窗体。Form1 窗体外观如图 1 所示。程序运行时，在 Form1 中名称为 Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示“(其名称为 Command1)，则显示Form2 窗体，且根据输入的圆的半径计算圆的面积，并在 Form2 的窗体上显示出来，如图 2 所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据!“。请填空。（分数：6.00）填空项 1:_填空项 1:_填空项 1:_42.在窗
29、体上画一个文本框，名称为 Text1，画一个命令按钮，名称为 Command1。程序运行时，单击命令按钮，能将事先输入文本框中的内容一个字符一个字符地写入顺序文件 test.dat 中。请在空格处填上适当的内容，将程序补充完整。Private Sub Command1_Click()Open“c:/test.dat“For Output As#1Fori=1 to Len(Text1.Text)(12) NextClose# iEnd Sub（分数：2.00）填空项 1:_有如图所示的窗体。程序执行时先在 Text1 文本框中输入编号，当焦点试图离开 Text1 时，程序检查编号的合法性，若编
30、号合法，则焦点可以离开 Text1 文本框；否则，显示相应错误信息，并自动选中错误的字符，且焦点不能离开 Text 1 文本框。（分数：6.00）填空项 1:_填空项 1:_填空项 1:_二级 VISUAL+BASIC 笔试-388 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.算法的时间复杂度是指_。A) 算法所处理的数据量 B) 算法的执行时间C) 算法在执行过程中所需要的基本运算次数 D) 算法程序中语句或指令条数（分数：2.00）A.B.C. D.解析：解析 一个算法的时间复杂度是指执行这个算法所需的极端工作量。2.数据的存储结构是
31、指_。A) 存储在外存中的数据 B) 数据所占的存储空间C) 数据在计算机中的顺序存储方式 D) 数据的逻辑结构在计算机中的表示（分数：2.00）A.B.C.D. 解析：解析 数据的存储结构也称为数据的物理结构，是数据的逻辑结构在计算机存储空间中的存放形式。3.下列关于队列的叙述正确的是_。A) 队列按“先进后出“原则组织数据 B) 队列属于非线性表C) 队列在队尾删除数据 D) 队列按“先进先出“原则组织数据（分数：2.00）A.B.C.D. 解析：解析 队列是一种操作受限的线性表。它只允许在线性表的一端进行插入操作，另一端进行删除操作。其中，允许插入的一端称为队尾(rear)，允许删除的一
32、端称为队首(front)。队列具有先进先出的特点，它是按“先进先出“的原则组织数据的。4.对长度为 n 的线性表排序，在最坏情况下，比较次数是 nlog2n 的排序方法是_。A) 快速排序 B) 冒泡排序C) 直接插入排序 D) 堆排序（分数：2.00）A.B.C.D. 解析：解析 在最坏情况下，快速排序、冒泡排序和直接插入排序需要的比较次数都是 n(n-1)/2，堆排序需要比较的次数为 nlog2n。5.下列描述中正确的是_。A) 软件工程只是解决软件项目的管理问题B) 软件工程主要解决软件产品的生产率问题C) 软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D) 软件工程只是解决
33、软件开发中的技术问题（分数：2.00）A.B.C. D.解析：解析 软件工程的目标是在给定成本、进度的前提下，开发出具有有效性、可靠性、可理解性、可维护性、可重用性、可适应性、可移植性、可追踪性和可互操作性且满足用户需求的产品。6.在软件设计中，不属于过程设计工具的是_。A) PDL B) DFD 图 C) PAD 图 D) N-S 图（分数：2.00）A.B. C.D.解析：解析 常见的过程设计工具有图形工具(程序流程图、N-S 图、PAD 图、HIPO 图)、表格工具(判定表)和语言工具(PDL)。DFD 是数据流图，是描述数据处理过程的工具。7.软件(程序)调试的目的是_。A) 诊断和改
34、正程序中的错误 B) 尽可能多地发现程序中的错误C) 发现并改正程序中的所有错误 D) 确定程序中错误的性质（分数：2.00）A. B.C.D.解析：解析 软件测试与软件调试是两个不同的概念：软件测试的目的是发现错误，而软件调试的目的是发现错误或导致程序失效的原因，并修改程序以修正错误，调试是测试之后的活动。8.数据库系统的核心是_。A) 数据库 B) 数据库管理系统C) 数据库管理员 D) 数据库应用系统（分数：2.00）A.B. C.D.解析：解析 数据库管理系统是一种软件系统，负责数据库中的数据组织、数据操纵、数据维护、控制及保护和数据服务等，是数据库系统的核心。9.在关系数据库中，用来
35、表示实体之间联系的是_。A) 二维表 B) E-R 图 C) 元组 D) 文件（分数：2.00）A. B.C.D.解析：解析 关系数据库系统采用关系模型作为数据的组织形式。在关系模型中用二维表来表示实体及实体间的联系。10.设有如下三个关系表（分数：2.00）A.B.C. D.解析：解析 对于两个关系的合并操作可以用笛卡尔积表示。设有 n 元关系 R 和 m 元关系 S，它们分别有 p 和 q 个元组，则 R 与 S 的笛卡尔积记为 RS，它是一个 m+n 元关系，元组个数是 pq。由题意可得，关系 T 是由关系 R 与关系 S 进行笛卡尔积运算得到的。11.设 a=3，b=5，c=2，d=6
36、，则下面语句输出的是_。Print45 * b Or a=c And bc Or cdA) False B) 1 C) True D) -1（分数：2.00）A. B.C.D.解析：解析 本题中包含的三种运算的优先级别由高到低依次为：算术运算符、比较运算符、逻辑运算符，Or 前面表达式的值为 False，两个 Or 之间表达式的值为 False，第二个 Or 后表达式的值也为False，And 的优先级比 Or 要高，所以最后输出的也是 False。因此，答案为 A) 。12.以下合法的 Visual Basic 标识符是_。A) a#x B) Const C) 9abc D) ForLoop
37、（分数：2.00）A.B.C.D. 解析：解析 变量名必须以字母开头，不能在变量名中出现句点“.“、空格或者嵌入!、#、$、%、，并且变量名的长度不能超过 255 个字符。变量名不能与关键字同名。选项 A) 中含有#；选项 B) 中，Const 是个声明常量的主关键字；选项 C) 中是以数字开头的；所以选项 A) 、B) 、C) 都是错误的。故本题答案是 D) 。13.为使程序运行时通用对话框 CD1 上显示的标题为“通用对话框窗口“，若通过程序设置该标题，则应使用的语句是_。A) CD1.Action=“通用对话框窗口“ B) CD1.Filter=“通用对话框窗口“C) CD1.FileN
38、ame=“通用对话框窗口“ D) CD1.DialogTitle=“通用对话框窗口/（分数：2.00）A.B.C.D. 解析：解析 通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框，该控件运行时不可见。通用对话框的 DialogTitle 属性用于返回或设置该对话框标题栏上所显示的文本；Action 属性用于设置被打开对话的类型；当通用对话框显示为“打开“或“另存为“类型时，其 FileName 属性用于返回或设置所选文件的路径和文件名，Filter(过滤器)属性用于指定在对话框的文件列表中显示文件的类型。14.可以
39、产生 3050(含 30 和 50)之间的随机整数的表达式是_。A) Int(Rnd*21+30) B) Int(Rnd*20+30)C) Int(Rnd*50-Rnd*30) D) Int(Rnd*30+50)（分数：2.00）A. B.C.D.解析：解析 生成某个范围内的随机整数，计算公式为：Int(上界-下界+1)*Rnd+下界)，题目中上界为50，下界为 30，所以正确答案为 A) 。15.设窗体上有一个名称为 HS1 的水平滚动条，如果执行了语句：HS1.Value=(HS1.Max-HS1.Min)/2+HS1.Min 则_.A) 滚动块处于最左端B) 滚动块处于最右端C) 滚动块
40、处于中间位置D) 滚动块可能处于任何位置，具体位置取决于 Max、Min 属性的值（分数：2.00）A.B.C. D.解析：解析 滚动条的 Value 属性用于设置滚动滑块所处的位置。Max 和 Min 属性分别设置滚动条的最大值和最小值，水平滚动条的最左端为 Min，最右端为 Max，Max 的值减去 Min 的值得到当前滚动条的刻度个数，本题中的语句设置了滚动条的 Value 属性值为当前滚动条的刻度个数的二分之一再加 Min 的刻度值，刚好将滚动滑块的位置设置在了整个滚动条的中间位置。因此，答案为 C) 。16.下列叙述中正确的是_。A) MsgBox 语句的返回值类型是字符串B) Ms
41、gBox 语句的第一个参数不能省略C) 如果省略 MsgBox 语句的第三个参数(Title)，则信息框的标题为空D) 执行 MsgBox 语句并出现信息框后，不用关闭信息框即可执行其他操作（分数：2.00）A.B. C.D.解析：解析 MsgBox 函数返回的是整数，而 MsgBox 语句没有返回值，所以选项 A) 错；省略 MsgBox 的第三个参数，则信息框的标题默认为工程名称，所以选项 C) 错；执行 MsgBox 语句弹出的是模式对话框，只有关闭以后才能进行其他操作，所以选项 D) 错。17.窗体上有一个名称为 Frame1 的框架(如图)，若要把框架上显示的“Frame1“改为汉字
42、“框架控件“，下面正确的语句是_。（分数：2.00）A.B.C. D.解析：解析 Frame 控件不包含 Name、Text、Value 属性，修改标题只能用 Caption 属性。18.要获得当前驱动器，应使用驱动器列表框的属性是_。A) Path B) Drive C) Dir D) Pattern（分数：2.00）A.B. C.D.解析：解析 驱动器控件常用的属性是 Drive，返回当前驱动器号。19.在窗体上画两个单选按钮，名称分别为 Option1、Option2，标题分别为“宋体“和“黑体“；一个复选框，名称为 Check1，标题为“粗体“；一个文本框，名称为 Text1，Text
43、 属性为“改变文字字体“。要求程序运行时，“宋体“单选按钮和“粗体“复选框被选中(窗体外观如下图所示)，则能够实现上述要求的语句序列是_。（分数：2.00）A.B.C.D. 解析：解析 本题考查的是单选按钮和复选框的属性。Value 属性是用来表示复选框或单选按钮的状态。对于单选按钮来说，Value 属性可以设置为 True 或者是 False。当设置为 True 时，该单选按钮是“打开“的，按钮的中心有一个圆点。对于复选框来说，Value 属性可以设置为 0，1，2 三种，其中：0-表示没有选择该复选框；1-表示选中该复选框；2-表示该复选框被禁止。所以本题的正确答案应该是 D) 。20.窗
44、体上有 Command1、Command2 两个命令按钮。现编写以下程序：Option Base 0Dim a()As Integer,m As IntegerPrivate Sub Command1_Click()m=InputBox(“请输入一个正整数“)ReDim a(m)End SubPrivate Sub Command2_Click()m=InputBox(“请输入一个正整数“)ReDim a(m)End Sub运行程序时，单击 Command1 后输入整数 8，再单击 Command2 后输入整数 4，则数组 a 中元素的个数是_。A) 4 B) 5 C) 8 D) 9（分数：2
45、.00）A.B. C.D.解析：解析 数组 a(m)中，m 表示的是数组中元素的个数，各元素的下标值为 0m。在给出的程序中，为 m 赋了两次值，但第二次的值会覆盖第一次的值，所以答案选 B) 。21.以下数组定义语句中，错误的是_。A) Dim arr(-5) As Integer B) Static arr(5)C) Dim arr(2,1 To 3) D) Dim arr(0 To 2,1 To 3)As Integer（分数：2.00）A. B.C.D.解析：解析 一维数组的形式：Dim 数组名(下界to上界)As数据类型或 Dim 数组名数据类型符(下界to上界)。下界和上界不能使用
46、变量，必须是常量，常量可以是直接常量、符号常量，一般是整型常量。二维数组的声明：Dim 数组名(下界to上界，下界to上界)As数据类型。其中的参数与一维数组完全相同(圆括号内为必要参数)。答案 A) 中，因为下界默认为 0，而上界必须大于 0，否则会出错。22.在窗体上画一个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i=3 To 1 Step-0.4Ptint Int(i)；Next iEnd Sub运行程序，单击命令按钮，窗体上显示的内容为_。A) 3 2 2 2 1 1 B) 3 2 2 1 1 1C) 3 2 2 1 1 D) 3 2
47、 1 1 1（分数：2.00）A.B. C.D.解析：解析 题中所述程序是一个初值为 3，步长为-0.4，终值为 1 的循环过程。第一次执行时，循环变量 i=3,Print Int(i)的输出结果为在窗体上打印数字 3，其中 Int()函数取不大于 i 的最大整数；第二次循环，i=2.6，输出结果为 2；第三次、第四次 i 值分别为 2.2 和 1.8，输出结果分别为 2 和 1；第五次循环，i=1.4，输出结果为 1；第六次循环，i=1，输出结果为 1。第六次循环后跳出循环，整个程序结束。23.下面程序的输出结果是_。Private Sub Command1_Click()ch $=“ABCDEF“proc ch: Print chEnd SubPrivate Sub proc(ch As String)s=“ “Fork=Len(ch) To 1 Step-1s=sMid(ch,k,1)Next kch=sEnd SubA) ABCDEF B) FEDCBA C) A D) F（分数：2.00）A.B. C.D.解析：解析 在自定义过程 proc 中，通过 For 循环语句和 Mid()函数，从右至左
