1、计算机等级考试二级 VISUAL+BASIC 机试 1 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：40.00)1.用来设置文字字体是否为粗体的属性是( )。A) FontItalic B) FontUnderline C) FontSize D) FontBold（分数：1.00）A.B.C.D.2.下面描述中，不属于软件危机表现的是( )。A) 软件过程不规范 B) 软件开发生产率低C) 软件质量难以控制 D) 软件成本不断提高（分数：1.00）A.B.C.D.3.对窗体上名称为 Command1 的命令按钮，编写如下事件过程：Private Su
2、b Command1_Click()Move 200, 200End Sub程序运行时，单击命令按钮，则产生的操作是( )。A) 窗体左上角移动到距屏幕左边界、上边界各 200 的位置B) 窗体左上角移动到距屏幕右边界、上边界各 200 的位置C) 窗体由当前位置向左、向上各移动 200D) 窗体由当前位置向右、向下各移动 200（分数：1.00）A.B.C.D.4.已知 a=6，b=15，c=23，则语句 Print Sgn(a+b Mod 6-c/a)End Sub运行程序，并在文本框中输入“123”，则在窗体上的输出结果为( )。A) 123 B) 112 C) 12123 D) 112
3、123（分数：1.00）A.B.C.D.27.能够将组合框 Combo1 中最后一个数据项删除的语句为( )。A) Combo1. RemoveItem Combo1. ListCount B) Combo1. RemoveItem Combo1. ListCount - 1C) Combo1. RemoveItem Combo1. ListIndex D) Combo1. RemoveItem Combo1. ListIndex - 1（分数：1.00）A.B.C.D.28.为了使窗体左上角不显示控制框，需设置为 False 的属性是( )。A) Visible B) Enabled C)
4、ControlBox D) Caption（分数：1.00）A.B.C.D.29.命令按钮 Command1 的单击事件过程如下：Private Sub Command1_Click()x=10Print f(x)End SubPrivate Function f(y As Integer)f=y*yEnd Function运行上述程序，如下叙述中正确的是( )。A) 程序运行出错，x 变量的类型与函数参数的类型不符B) 在窗体上显示 100C) 函数定义错，函数名 f 不能又作为变量名D) 在窗体上显示 10（分数：1.00）A.B.C.D.30.确定图片框 Picturel 在窗体上位置的
5、属性是( )。A) Width 和 Height B) Left 和 Top C) Width 和 Top D) Height 和 Left（分数：1.00）A.B.C.D.31.以下关于文件的叙述中，错误的是( )。A) 顺序文件中的记录是一个接一个地顺序存放B) 随机文件中记录的长度是随机的C) 文件被打开后，自动生成一个文件指针D) EOF 函数用来测试是否到达文件尾（分数：1.00）A.B.C.D.32.现有如下一段程序：Private Sub Command1_Click()x = UCase(InputBox(“输入:“)Select Case xCase “A“ To “C“Pr
6、int “考核通过!“Case “D“Print “考核通过!“Case ElsePrint “输入数据不合法!“End SelectEnd Sub执行程序，在输入框中输入字母“B”，则以下叙述中正确的是( )。A) 程序运行错 B) 在窗体上显示“考核通过!”C) 在窗体上显示“考核不通过!” D) 在窗体上显示“输人数据不合法!”（分数：1.00）A.B.C.D.33.以下叙述中错误的是( )。A) 续行符与它前面的字符之间至少要有一个空格B) Visual Basic 中使用的续行符为下划线(_)C) 以撇号()开头的注释语句可以放在续行符的后面D) Visual Basic 可以自动对
7、输入的内容进行语法检查（分数：1.00）A.B.C.D.34.窗体上有单选钮和列表框控件。单击名称为 Option1、标题为“国家”的单选钮，向列表框中添加国家名称，如下图所示。（分数：1.00）A.B.C.D.35.下面不属于需求分析阶段任务的是( )。A) 确定软件系统的功能需求 B) 确定软件系统的性能需求C) 需求规格说明书评审 D) 制定软件集成测试计划（分数：1.00）A.B.C.D.36.以下不属于单选按钮的属性是( )。A) Caption B) Name C) Min D) Enabled（分数：1.00）A.B.C.D.37.窗体上有 1 个名称为 Command1 的命令
8、按钮，事件过程及函数过程如下：Private Sub Command1_Click()Dim m As Stringm = InputSox( “请输入字符串“ )Print pick_str(m)End SubPrivate Function pick_str(s As String)As Stringtemp = “ “i=1sLen = Len (s)Do While i = sLen / 2temp=temp +Mid(s, i, 1)+Mid(s, sLen-i+1, 1)i=i+1Looppick_str = tempEnd Function运行程序，单击命令按钮，并在输入对话框中
9、输入“basic”，则在窗体上显示的内容为( )。A) bcai B) cbia C) bcais D) cbias（分数：1.00）A.B.C.D.38.以下变量名中合法的是( )。A) x-2 B) 12abc C) sum_total D) print（分数：1.00）A.B.C.D.39.窗体上有 1 个名称为 Text1 的文本框，1 个名称为 Label1 的标签。程序运行后，如果在文本框中输入信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。A) Private Sub Label1_Click()Label1. Caption = Text1. Tex
10、tEnd SubB) Private Sub Label1_Change()Label1. Caption = Text1. TextEnd SubC) Private Sub Text1_Click()Label1. Caption = Text1. TextEnd SubD) Private Sub Text1_Change()Label1. Caption = Text1. TextEnd Sub（分数：1.00）A.B.C.D.40.窗体上有 1 个名称为 Command1 的命令按钮，事件过程如下：Private Sub Command1_Click()Dim x%, y%, z%x
11、 = InputBox( “请输入第 1 个整数“ )y = InputBox( “请输入第 2 个整数“ )Do Until x =yIf xy Then x=x-y Else y=y-xLoopPrint xEnd Sub运行程序，单击命令按钮，并输入 2 个整数 169 和 39，则在窗体上显示的内容为( )。A) 11 B) 13 C) 23 D) 39（分数：1.00）A.B.C.D.二、基本操作题(总题数：2，分数：18.00)41.在名称为 Form1 的窗体上添加一个名称为 Label1、标题为“滚动条控件”的标签，一个名称为HScroll1 的水平滚动条。请通过属性窗口设置属
12、性使水平滚动条取值范围的最大值为 100，最小值为 1，滚动条的高度为 300，宽度为 3000，滚动块的初始位置为 20。程序运行后的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt1. vbp，窗体文件名保存为 sjt1. frm。（分数：9.00）_42.在名称为 Form1 的窗体上添加一个名称为 Shape1 的形状控件，位置在窗体的顶部，在属性窗口中将其设置为圆形。添加一个名称为 Timer1 的计时器，在属性窗口中将其设置为禁用，时间间隔为 0.5 秒，窗体如图所示。请编写窗体的 Load 事件过程和计时器的事件过程，使得程序一开始运行，计时器即变为可用
13、，且每隔 0.5 秒形状控件向下移动 100。注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名保存为 sjt2. vbp，窗体文件名保存为 sjt2. frm。（分数：9.00）_三、简单应用题(总题数：2，分数：24.00)43.在考生文件夹中有一个工程文件 sjt3. vbp。程序的功能是输入用户名和密码。程序运行时，当输入密码到文本框 Text2 中时，如果“显示密码”复选框没有被选中，则在文本框 Text3 中同时显示“#”(如图所示)；如果“显示密码”复选框被选中，再重新输入密码时，则在 Text3 中同时显示的是密码字符本身。在给
14、出的窗体文件中已经添加了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。（分数：12.00）_44.考生文件夹中有一个工程文件 sjt4. vbp。该程序的功能是：程序运行时，向文本框控件数组Text1(有 5 个文本框)中任意输入 5 个数，单击名称为 Command1 的命令按钮，则找出其中最小数并在标签lblResult 中显示。给出的窗体文件中已经有了全部控件，但程序不完整，其中函数 FindMin 的作用是返回两个数中的较小数。要求：去掉程序中的注释符，把程序中的?改为正确的内
15、容。注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。（分数：12.00）_四、综合应用题(总题数：1，分数：18.00)45.在考生文件夹中有一个工程文件 sjt5. vbp。该程序的功能是：分别统计 7*7 数组四周元素之和及四周元素中能够被 7 整除的元素的个数，并将统计结果在相应的标签中显示。请仔细阅读已有程序，然后在标出的位置编写适当的程序，实现上述的功能。要求：不得修改原有程序和控件的属性。在结束程序运行之前，必须至少正确运行一次程序，将统计的结果显示在标签中，否则将没有成绩，最后将修改后的文件按原文件名进行存盘。（分数：18.00）_计算机等级考试二级
16、 VISUAL+BASIC 机试 1 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：40，分数：40.00)1.用来设置文字字体是否为粗体的属性是( )。A) FontItalic B) FontUnderline C) FontSize D) FontBold（分数：1.00）A.B.C.D. 解析：解析 FontItalic 用来设置文字是否为斜体，FontUnderLine 用来设置文字是否加下划线，FontSize 用来设置文字的字号，FontBold 用来设置文字是否为粗体。2.下面描述中，不属于软件危机表现的是( )。A) 软件过程不规范 B) 软件开发生
17、产率低C) 软件质量难以控制 D) 软件成本不断提高（分数：1.00）A. B.C.D.解析：解析 软件危机主要表现在：软件需求的增长得不到满足；软件开发成本和进度无法控制；软件质量难以保证；软件不可维护或维护程度非常低；软件的成本不断提高；软件开发生产率的提高赶不上硬件的发展和应用需求的增长。所以选择 A。3.对窗体上名称为 Command1 的命令按钮，编写如下事件过程：Private Sub Command1_Click()Move 200, 200End Sub程序运行时，单击命令按钮，则产生的操作是( )。A) 窗体左上角移动到距屏幕左边界、上边界各 200 的位置B) 窗体左上角移
18、动到距屏幕右边界、上边界各 200 的位置C) 窗体由当前位置向左、向上各移动 200D) 窗体由当前位置向右、向下各移动 200（分数：1.00）A. B.C.D.解析：解析 Move 方法是窗体的移动方法，其中 200，200 是窗体左上角的坐标(X，Y)。坐标系是以屏幕左上角为原点，向右为 X 轴正方向，向下为 Y 轴正方向。所以本题中窗体左上角移动到距屏幕左边界、上边界各 200 的位置。故 A 选项正确。4.已知 a=6，b=15，c=23，则语句 Print Sgn(a+b Mod 6-c/a)其中对象名称可以是窗体(Form)、图片框(PictureBox)或打印机(Prinfe
19、r)，也可以是立即窗口(Debug)。如果省略对象名称，则在当前窗体上输出。10.有三个关系 R、S 和 T 如下：（分数：1.00）A.B.C. D.解析：解析 如果 S=T/R，则 S 称为 T 除以 R 的商。在除运算中 S 的域由 T 中那些不出现在 R 中的域所组成，对于 S 中的任一有序组，由它与关系 R 中每个有序组所构成的有序组均出现在关系 T 中。所以本题选择 C。11.为了使每秒钟发生一次计时器事件，可以将其 Interval 属性设置为( )。A) 1 B) 10 C) 100 D) 1000（分数：1.00）A.B.C.D. 解析：解析 计时器控件的 Interval
20、属性值以毫秒为单位，设置为 1000 则计时器事件每 1 秒钟发生一次。12.在下列模式中，能够给出数据库物理存储结构与物理存取方法的是( )。A) 外模式 B) 内模式 C) 概念模式 D) 逻辑模式（分数：1.00）A.B. C.D.解析：解析 数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，所以选择 B。13.设在工程文件中有一个标准模块，其中定义了如下记录类型Type Books
21、Name As String * 10TelNum As String * 20End Type在窗体上画一个名为 Command1 的命令按钮，要求当执行事件过程 Command1_Click 时，在顺序文件Person. txt 中写入一条记录。下列能够完成该操作的事件过程是( )。A) Private Sub Command1_Click()Dim B As BooksOpen “c: /Person. txt“ For Output As #1B. Name = InputBox( “输入姓名“ )B. TelNum = InputBox( “输入电话号码“ )Write #1, B.
22、 Name, B. TelNumClose #1End SubB) Private Sub Command1_Click()Dim B As BooksOpen “c: /Person. txt“ For Input As #1B. Name = InputBox( “输入姓名“ )B. TelNum = InputBox( “输入电话号码“ )Print #1, B. Name, B. TelNumClose #1End SubC) Private Sub Command1_Click()Dim B As BooksOpen “c: /Person. txt“ For Output As #
23、1B. Name = InputBox( “输入姓名“ )B. TelNum = InputBox( “输入电话号码“ )Write #1, BClose #1End SubD) Private Sub Command1_Click()Open “c: /Person. txt“ For Input As #1Name = InputBox( “输入姓名“ )TelNum = InputBox( “输入电话号码“ )Print #1, Name, TelNumClose #1End Sub（分数：1.00）A. B.C.D.解析：解析 数据文件的写操作分为 3 步，即打开文件、写入文件和关闭文
24、件。首先，在顺序文件中打开文件写入数据的打开方式为：Open 文件名 For Output As#文件号。因此 B、C 选项排除，只看 A、D 选项。写入顺序文件 Print#语句格式为：Print#文件号，变量名，变量名，Write 语句的的格式与 Print 语句一样：Write#文件号，变量名，变量名。而记录类型变量不能整体引用，需要指明记录变量中的成员名，格式为：记录变量名. 成员名，Books 类型变量 B 成员 Name 和 TelNum 赋值和引用应该是 B. Name、B. TelNum，因此 A 选项正确。14.下列叙述中正确的是( )。A) 循环队列是队列的一种链式存储结构
25、 B) 循环队列是队列的一种顺序存储结构C) 循环队列是非线性结构 D) 循环队列是一种逻辑结构（分数：1.00）A.B. C.D.解析：解析 在实际应用中，队列的顺序存储结构一般采用循环队列的形式。15.一棵二叉树共有 25 个结点，其中 5 个是叶子结点，则度为 1 的结点数为( )。A) 16 B) 10 C) 6 D) 4（分数：1.00）A. B.C.D.解析：解析 根据二叉树的性质 3：在任意一棵二叉树中，度为 0 的叶子结点总是比度为 2 的结点多一个，所以本题中度为 2 的结点是 5-1=4 个，所以度为 1 的结点的个数是 25-5-4=16 个。16.在黑盒测试方法中，设计
26、测试用例的主要根据是( )。A) 程序内部逻辑 B) 程序外部功能 C) 程序数据结构 D) 程序流程图（分数：1.00）A.B. C.D.解析：解析 黑盒测试是对软件已经实现的功能是否满足需求进行测试和验证，黑盒测试完全不考虑程序内部的逻辑结构和内部特性，只根据程序的需求和功能规格说明，检查程序的功能是否符合它的功能说明，所以本题选择 B。17.在软件设计中不使用的工具是( )。A) 系统结构图 B) PAD 图 C) 数据流图(DFD 图) D) 程序流程图（分数：1.00）A.B.C. D.解析：解析 系统结构图是对软件系统结构的总体设计的图形显示。在需求分析阶段，已经从系统开发的角度出
27、发，把系统按功能逐次分割成层次结构，是在概要设计阶段用到的。PAD 图是在详细设计阶段用到的。程序流程图是对程序流程的图形表示，在详细设计过程中用到。数据流图是结构化分析方法中使用的工具，它以图形的方式描绘数据在系统中流动和处理的过程，由于它只反映系统必须完成的逻辑功能，所以它是一种功能模型，是在可行性研究阶段用到的而非软件设计时用到，所以选择 C。18.窗体上有 1 个名称为 Command1 的命令按钮，事件过程及函数过程如下：Private Sub Command1_Click()Dim p As Integerp=m(1) +m(2) +m(3)Print pEnd SubPrivat
28、e Function m(n As Integer)As IntegerStatic s As IntegerFor i = 1 To ns=s+1Nextm=sEnd Function运行程序，第 2 次单击命令按钮 Command1 时的输出结果为( )。A) 6 B) 10 C) 16 D) 28（分数：1.00）A.B.C.D. 解析：解析 在过程 m 中 s 被定义为静态变量，因此它的值只在第一次调用过程时初始化，以后再调用都不再初始化，而是保留之前的值。m 过程的功能是根据参数值累加，因此第 1 次单击时，m(1)+m(2)+m(3)=1+3+6=10，此时变量 s 的值，即过程
29、m 的值为 6，第 2 次单击时，m(1)+m(2)+m(3)=7+9+12=28。因此答案为 D。19.为了清除列表框中指定的项目，应使用的方法是( )。A) Cls B) Clear C) Remove D) RemoveItem（分数：1.00）A.B.C.D. 解析：解析 清除列表框中的指定内容要使用 RemoveItem 方法，格式为：RemoveItem(索引值)，只要指定要清除项目的索引值就可以清除指定项自。如果要清除列表框中的全部内容可以使用 Clear 方法。20.语句 Dim Arr(-2 To 4)As Integer 所定义的数组的元素个数为( )。A) 7 个 B)
30、6 个 C) 5 个 D) 4 个（分数：1.00）A. B.C.D.解析：解析 本题是定义了一个一维数组，下标是-2 to 4，所以数组元素的个数是 4-(-2)+1=7，故选A。21.运行如下程序Private Sub Command1_Click()Dim a(5, 5)As IntegerFor i = 1 To 5For j = 1 To 4a(i, j)=i * 2+jIf a(i, j)/7 =a(i, j) /7 Thenn=n+1End IfNext jNextPrint nEnd Subn 的值是( )。A) 2 B) 3 C) 4 D) 5（分数：1.00）A.B. C.
31、D.解析：解析 VB 中“/”是浮点除法运算符，“/”是整数除法运算符，程序中的条件表达式 a(i，j)/7=a(i，j)/7 成立时说明这个数能够被 7 整除，程序即是统计这个二维数组中能被 7 整除的数的个数。数组元素值在 i=1 时为(3，4，5，6)，i=2 时为(5，6，7，8)，i=3 时为(7，8，9，10)，i=4 时为(9，10，11，12)，i=5 时为(11，12，13，14)，其中能够被 7 整除的数有 7、7、14 共 3 个。因此答案为B。22.以下关于多重窗体程序的叙述中，错误的是( )。A) 对于多重窗体程序，需要单独保存每个窗体B) 在多重窗体程序中，可以根据
32、需要指定启动窗体C) 在多重窗体程序中，各窗体的菜单是彼此独立的D) 用 Hide 方法不仅可以隐藏窗体，而且还可以清除内存中的窗体（分数：1.00）A.B.C.D. 解析：解析 用 Hide 方法只是隐藏窗体，不卸载窗体，所以不会清除内存中的窗体。故选项 D 错误。23.在满足实体完整性约束的条件下A) 一个关系中应该有一个或多个候选关键字 B) 一个关系中只能有一个候选关键字C) 一个关系中必须有多个候选关键字 D) 一个关系中可以没有候选关键字（分数：1.00）A. B.C.D.解析：解析 实体完整性约束要求关系的主键中属性值不能为空值，所以选择 A。24.以下不能触发滚动条 Chang
33、e 事件的操作是( )。A) 拖动滚动框B) 单击两端的滚动箭头C) 单击滚动框D) 单击滚动箭头与滚动框之间的滚动条（分数：1.00）A.B.C. D.解析：解析 改变滚动框的位置后会触发 Change 事件，拖动滚动框、单击滚动箭头、单击滚动箭头与滚动框之间的滚动条都会改变滚动框的位置。25.以下关于图片框控件的说法中，错误的是( )。A) 可以通过 Print 方法在图片框中输出文本B) 图片框控件中的图形可以在程序运行过程中被清除C) 图片框控件中可以放置其他控件D) 用 Stretch 属性可以自动调整图片框中图形的大小（分数：1.00）A.B.C.D. 解析：解析 可以通赶 Pri
34、nt 方法在图片框中输出文件，图片框中的图形可以在程序运行过程中通过载入空文件的方法清除，图片框控件可以作为父控件，即可以放置其他控件，Stretch 属性用来自动调整图片框中图形内容的大小。26.窗体上有 1 个名称为 Text1、内容为空的文本框。编写如下事件过程：Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)Print Text1. Text;End Sub运行程序，并在文本框中输入“123”，则在窗体上的输出结果为( )。A) 123 B) 112 C) 12123 D) 112123（分数：1.00）A.B.
35、C.D. 解析：解析 KeyUp 事件是在松开按钮时发生。按下 1 松开时，文本框中显示 1，执行 KeyUp 事件过程，在窗体上显示文本框内容，即 1。按下 2 松开时，文本框中显示 12，执行 KeyUp 事件过程，在窗体上 1 后面接着现在显示文本框的内容，即窗体上显示为 112。按下 3 松开时，文本框中显示 123，执行 KeyUp 事件过程，在窗体上 112 后面接着显示文本框的内容，即在窗体上显示为 112123。27.能够将组合框 Combo1 中最后一个数据项删除的语句为( )。A) Combo1. RemoveItem Combo1. ListCount B) Combo1
36、. RemoveItem Combo1. ListCount - 1C) Combo1. RemoveItem Combo1. ListIndex D) Combo1. RemoveItem Combo1. ListIndex - 1（分数：1.00）A.B. C.D.解析：解析 组合框的 RemoveItem 方法与列表框删除指定项目的方法相同，格式为：RemoveItem(索引值)，而列表中的项目索引值从 0 开始，因此最后一项的索引值为 ListCount - 1。28.为了使窗体左上角不显示控制框，需设置为 False 的属性是( )。A) Visible B) Enabled C)
37、ControlBox D) Caption（分数：1.00）A.B.C. D.解析：解析 窗体的 Visible 属性是设置窗体可见不可见；Enabled 属性是设置可用不可用；Caption 属性是用来设置窗体标题栏上显示的内容；ControlBox 属性是设置窗体左上角是否显示控制框，当属性值为 True 时，显示控制框，否则 False 时，不显示。故选项 C 正确。29.命令按钮 Command1 的单击事件过程如下：Private Sub Command1_Click()x=10Print f(x)End SubPrivate Function f(y As Integer)f=y*
38、yEnd Function运行上述程序，如下叙述中正确的是( )。A) 程序运行出错，x 变量的类型与函数参数的类型不符B) 在窗体上显示 100C) 函数定义错，函数名 f 不能又作为变量名D) 在窗体上显示 10（分数：1.00）A. B.C.D.解析：解析 变量 x 在按钮单击事件过程中没有定义，因此系统自动将它定义为 Variant 类型，由于过程中参数类型为 Integer，所以程序运行时会提示“ByRef 参数类型不符”错误。A 选项正确。只在按钮事件中加上 Dim x as Integer 就可以解决问题，或者 f 过程中的 y as integer 改为 ByVal y as
39、integer 也可以解决。30.确定图片框 Picturel 在窗体上位置的属性是( )。A) Width 和 Height B) Left 和 Top C) Width 和 Top D) Height 和 Left（分数：1.00）A.B. C.D.解析：解析 确定图片框在窗体上位置的属性是 Left 和 Top，它们使用的是相对坐标，以窗体为参考点。31.以下关于文件的叙述中，错误的是( )。A) 顺序文件中的记录是一个接一个地顺序存放B) 随机文件中记录的长度是随机的C) 文件被打开后，自动生成一个文件指针D) EOF 函数用来测试是否到达文件尾（分数：1.00）A.B. C.D.解析
40、：解析 随机文件中记录的长度是固定的、相等的，不是随机的。故选项 B 错误。32.现有如下一段程序：Private Sub Command1_Click()x = UCase(InputBox(“输入:“)Select Case xCase “A“ To “C“Print “考核通过!“Case “D“Print “考核通过!“Case ElsePrint “输入数据不合法!“End SelectEnd Sub执行程序，在输入框中输入字母“B”，则以下叙述中正确的是( )。A) 程序运行错 B) 在窗体上显示“考核通过!”C) 在窗体上显示“考核不通过!” D) 在窗体上显示“输人数据不合法!
41、”（分数：1.00）A.B. C.D.解析：解析 程序中 Ucase 函数将输入的字母转换为大写，然后通过 Select 多分支控制语句选择输出不同信息，当输入字母在“A”到“C”之间时，显示“考核通过!”，输入的是“D”时显示“考核不通过!”，如果输入的是“A”到“D”之外的其他字符则显示“输入数据不合法!”。程序中输入字母“B”，因此会显示“考核通过!”。33.以下叙述中错误的是( )。A) 续行符与它前面的字符之间至少要有一个空格B) Visual Basic 中使用的续行符为下划线(_)C) 以撇号()开头的注释语句可以放在续行符的后面D) Visual Basic 可以自动对输入的内
42、容进行语法检查（分数：1.00）A.B.C. D.解析：解析 续行符“_”与前面的内容至少要保留一个空格，并且续行符只能出现在行尾，后面不能有注释。故选项 C 错误。34.窗体上有单选钮和列表框控件。单击名称为 Option1、标题为“国家”的单选钮，向列表框中添加国家名称，如下图所示。（分数：1.00）A.B. C.D.解析：解析 程序没有错误。数组变量定义时可以不用声明上下界。List 控件列表项的索引从 0 开始。Array 函数只适用于一组数组，只能对一维数组进行初始化，不能对二维数组或多维数组进行初始化。因此叙述正确的是 B 选项。35.下面不属于需求分析阶段任务的是( )。A) 确
43、定软件系统的功能需求 B) 确定软件系统的性能需求C) 需求规格说明书评审 D) 制定软件集成测试计划（分数：1.00）A.B.C.D. 解析：解析 需求分析阶段的工作有：需求获取；需求分析；编写需求规格说明书；需求评审，所以选择 D。36.以下不属于单选按钮的属性是( )。A) Caption B) Name C) Min D) Enabled（分数：1.00）A.B.C. D.解析：解析 单选按钮没有 Min 属性，滚动条控件的属性中有 Min 属性。37.窗体上有 1 个名称为 Command1 的命令按钮，事件过程及函数过程如下：Private Sub Command1_Click()
44、Dim m As Stringm = InputSox( “请输入字符串“ )Print pick_str(m)End SubPrivate Function pick_str(s As String)As Stringtemp = “ “i=1sLen = Len (s)Do While i = sLen / 2temp=temp +Mid(s, i, 1)+Mid(s, sLen-i+1, 1)i=i+1Looppick_str = tempEnd Function运行程序，单击命令按钮，并在输入对话框中输入“basic”，则在窗体上显示的内容为( )。A) bcai B) cbia C)
45、 bcais D) cbias（分数：1.00）A. B.C.D.解析：解析 过程 pick_str 的功能是对输入的字符串的字符重新组合，通过 Do 循环从原字符串中头尾开始各取一个字符重新组合，循环次数小于等于原字符串长度整除 2 的值。当输入字符串是“basic”时，字符串长度为 5，循环次数为 5/2=2 次，因此取出的字符依次是“b”，“c”，“a”，“i”。即“bcai”，因此答案为 A。38.以下变量名中合法的是( )。A) x-2 B) 12abc C) sum_total D) print（分数：1.00）A.B.C. D.解析：解析 根据 VB 中变量名的命名规则，变量 x
46、-2 中有-减号，不合法；变量 12abc 是以数字开头，不合法；变量 print 是 VB 的保留字，不能作变量名，也不合法。sum_total 是符合命名规则，是合法的。故选 C。39.窗体上有 1 个名称为 Text1 的文本框，1 个名称为 Label1 的标签。程序运行后，如果在文本框中输入信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。A) Private Sub Label1_Click()Label1. Caption = Text1. TextEnd SubB) Private Sub Label1_Change()Label1. Caption
47、= Text1. TextEnd SubC) Private Sub Text1_Click()Label1. Caption = Text1. TextEnd SubD) Private Sub Text1_Change()Label1. Caption = Text1. TextEnd Sub（分数：1.00）A.B.C.D. 解析：解析 题意是在文本框中输入信息，会影响标签上显示的内容，所以触发的是文本框 Text1 的事件，要在文本框 Text1 的事件过程中写代码，因此排除 A、B 选项。又因为标签上显示的内容会随着文本框中输入信息变化，因此要在 Text1 的 Change 事件过
48、程写代码。故 D 选项正确。40.窗体上有 1 个名称为 Command1 的命令按钮，事件过程如下：Private Sub Command1_Click()Dim x%, y%, z%x = InputBox( “请输入第 1 个整数“ )y = InputBox( “请输入第 2 个整数“ )Do Until x =yIf xy Then x=x-y Else y=y-xLoopPrint xEnd Sub运行程序，单击命令按钮，并输入 2 个整数 169 和 39，则在窗体上显示的内容为( )。A) 11 B) 13 C) 23 D) 39（分数：1.00）A.B. C.D.解析：解析 程序中 Do 循环比较输入的两个数的大小，把较大的数值减去较小的数值后再与较小的值
