1、国家二级 VB机试（选择题）模拟试卷 26 及答案与解析 一、选择题 1 结构化程序设计的基本原则不包括 ( )。 （ A）多态性 （ B）自顶向下 （ C）模块化 （ D）逐步求精 2 程序流程图中带有箭头的线段表示的是 ( )。 （ A）图元关系 （ B）数据流 （ C）控制流 （ D）调用关系 3 在长度为 n的有序线性表中进行二分查找，最坏情况下需要比较的次数是( )。 （ A） O(n) （ B） O(n2) （ C） O(log2n) （ D） O(nlog2n) 4 下列叙述中正确的是 ( )。 （ A）顺序存储结构的存储一定是连续的，链式存储结构的存储空间不一定是连续的 （ B
2、）顺序存储结构只针对线性结构，链式存储结构只针对非线性结构 （ C）顺序存储结构能存储有序表，链式存储结构不能存储有序表 （ D）链式存储结构比顺序存储结构节省存储空间 5 软件按功能可以分为：应用软件、系统软件和支撑软件 (或工具软件 )。下面属于应用软件的是 ( )。 （ A）编译程序 （ B）操作系统 （ C）教务管理系统 （ D）汇编程序 6 下面叙述中错误的是 ( )。 （ A）软件测试的目的是发现错误 并改正错误 （ B）对被调试的程序进行 “错误定位 “是程序调试的必要步骤 （ C）程序调试通常也称为 Debug （ D）软件测试应严格执行测试计划，排除测试的随意性 7 软件详细
3、设计生产的图如下：该图是 ( ) （ A） N S图 （ B） PAD图 （ C）程序流程图 （ D） E R图 8 数据库管理系统是 ( )。 （ A）操作系统的一部分 （ B）在操作系统支持下的系统软件 （ C）一种编译系统 （ D）一种操作系统 9 有三个关系 R、 S和 T如下：由关系 R和 S通过运算得到关系 T，则所使用的运算为 ( )。 （ A）并 （ B）自然连接 （ C）笛卡尔积 （ D）交 10 设有表示学生选课的三张表，学生 S(学号，姓名，性别，年龄，身份证号 )，课程 C(课号，课名 )，选课 SC(学号，课号，成绩 )，则表 SC的关键字 (键或码 )为( )。 （
4、 A）课号，成绩 （ B）学号，成绩 （ C）学号，课号 （ D）学号，姓名，成绩 11 以下不能输出 “Program“的语句是 ( )。 （ A） Print Mid(“VBProgram“， 3， 7) （ B） Print Right(“VBProgram“， 7) （ C） Print Mid(“VBProgram“， 3) （ D） Print Left(“VBProgram“， 7) 12 以下叙述中错误的是 ( )。 （ A）在通用过程中，多个形式参数之间可以用逗号作为分隔符 （ B）在 Print方法中，多个输出项之间可以用逗号作为分隔符 （ C）在 Dim语句中，所定义的多
5、个变量可以用逗号作为分隔符 （ D）当一行中有多个语句时，可以用逗号作为分隔符 13 以下关于函数过程的叙述中，正确的是 ( )。 （ A）函数过程形参的类型与函数返回值的 类型没有关系 （ B）在函数过程中，过程的返回值可以有多个 （ C）当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递 （ D）如果不指明函数过程参数的类型，则该参数没有数据类型 14 以下关于过程及过程参数的描述中，错误的是 ( )。 （ A）过程的参数可以是控件名称 （ B）调用过程时使用的实参的个数应与过程形参的个数相同 (假定不含可变参数 ) （ C）只有函数过程能够将过程中处理的信息返回到调用程序
6、中 （ D）窗体可以作为过程的参数 15 下面关于标准模块的叙述中错误的是 ( )。 （ A）标准模块中可以声明全局变量 （ B）标准模块中可以包含一个 Sub Main过程，但此过程不能被设置为启动过程 （ C）标准模块中可以包含一些 Public过程 （ D）一个工程中可以含有多个标准模块 16 下面正确使用动态数组的是 ( )。 17 在设计窗体时双击窗体的任何地方，可以打开的窗口是 ( )。 （ A）代码窗口 （ B）属性窗口 （ C）工程资源管理器窗口 （ D）工具箱窗口 18 若变量 a未事先定义而直接使用 (例如： a 0)，则变量 a的类型是 ( )。 （ A） Integer
7、 （ B） String （ C） Boolean （ D） Variant 19 以下关系表达式中，其值为 True的是 ( )。 （ A） XYZ “XYz“ （ B） VisualBasic“visualbasic“ （ C） the “there“ （ D） Integer “Int“ 20 执行以下程序段： a$ “Visual Basic Programming“ b$ “C “ c$ UCase(Left$(a$， 7)& b$ & Right$(a$， 12)后，变量 c$的值为 ( )。 （ A） Visual BASIC Programming （ B） VISUAL C
8、Programming （ C） Visual C Programming （ D） VISUAL BASIC Programming 21 若看到程序中有以下事件过程，则可以肯定的是，当程序运行时 ( )。 Private Sub Click_MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single) Print “VB Program“ End Sub （ A）用鼠标左键单击名称为 “Command1“的命令按钮时，执行此过程 （ B）用鼠标左键单击名称为 “MouseDown“的命令按钮时，执行此过程
9、（ C）用鼠标右键单击名称为 “MouseDown“的控件时，执行此过程 （ D）用鼠标左键或右键单击名称为 “Click“的控件时，执行此过程 22 窗体上有名称为 Command1的命令按钮和名称为 Text1的文本框 Private Sub Command1_Click() Text1.Text “程序设计 “ Text1.SetFocus End Sub Private Sub Text1_GotFocus() Text1.Text “等级考试 “ End Sub 运行以上程序，单击命令按钮后 ( )。 （ A）文本框中显示的是 “程序设计 “，且焦点在文本框中 （ B）文本框中显示的
10、是 “等级考试 “，且焦点在文本框中 （ C）文本框中显示的是 “程序设计 “，且焦点在命令按钮上 （ D）文本框中显示的是 “等级考试 “，且焦点在命令按钮上 23 要求当鼠标在图片框 P1中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是 ( )。 （ A） Private Sub P1_MouseMove(Button As Integer， Shift As Integer， X As Single， Y As Single) Print X， Y End Sub （ B） Private Sub P1_MouseDown(Button As Integer
11、， Shift As Integer， X As Single， Y As Single) Picture.Print X， Y End Sub （ C） Private Sub P1_MouseMove(Button As Integer， Shift As Integer， X As Single， Y As Single) P1.Print X， Y End Sub （ D） Private Sub Form_MouseMove(Button As Integer， Shift As Integer， X As Single， Y As Single) P1.Print X， Y End
12、 Sub 24 为了使窗体的大小可以改变，必须把它的 BorderStyle属性设置为 ( )。 （ A） 1 （ B） 2 （ C） 3 （ D） 4 25 要使两个单选按钮属于同一个框架，下面三种操作方法中正确的是 ( )。 先画一个框架，再在框架中画两个单选按钮 先画一个框架，再在框架外画两个单选按钮，然后把单选按钮拖到框架中 先画两个单选按钮，再画框架将单选按钮框起来 （ A） （ B） 、 （ C） （ D） 、 、 26 能够存放组合框的所有项目内容的属性是 ( )。 （ A） Caption （ B） Text （ C） List （ D） Selected 27 以下叙述中错误
13、的是 ( )。 （ A）在程序运行时，通用对话框控件是不可见的 （ B）调用同一个通用对话框控件的不同方法 (如 ShowOpen或 ShowSave)可以打开不同的对话框窗口 （ C）调用通用对话框控件的 ShowOpen方法，能够直接打开在该通用对话框中指定的文件 （ D）调用通用对话框控件的 ShowColor方法，可以打开颜色对话框窗口 28 下面控件中，没有 Caption属性的是 ( )。 （ A）复选框 （ B）单选按钮 （ C）组合框 （ D）框架 29 设窗体中有一个文本框 Text1，若在程序中执行了 Text1.SetFocus，则触发( )。 （ A） Text1的 S
14、etFocus事件 （ B） Text1的 GotFocus事件 （ C） Text1的 LostFocus事件 （ D）窗体的 GotFocus 事件 30 窗体上有两个水平滚动条 HV、 HT，还有一个文本框 Text1和一个标题为 “计算 “的命令按钮 Command1，并编写了以下程序：Private Sub Command1_Click()Call calc(HV.Value， HT.Value)End SubPublic Sub calc(x As Integer， y As Integer)Text1.Text x*yEnd Sub运行程序，单击 “计算 “按钮，可根据速度与时间
15、计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是 ( )。 （ A）过程调用语句不对，应为 calc(HV， HT) （ B）过程定义语句的形式参数不对，应为 Sub calc(x As Control， y As Control) （ C）计算结果在文本框中显示出来 （ D）程序不能正确运行 31 在窗体上画一个命令按钮，然后编写如下事件过 程： Private Sub Command1_Click() Dim I， Num Randomize Do For I 1 To 1000 Num Int(Rnd * 100) Print Num； Select Case Num Case
16、 12 Exit For Case 58 Exit Do Case 65， 68， 92 End End Select Next I Loop End Sub 上述事件过程执行后，下列描述中正确的是 ( )。 （ A） Do循环执行的次数为 1000次 （ B）在 For循环中产生的随机数小于或等于 100 （ C）当所产生的随机数为 12时结束所有循环 （ D）当所产生的随机数为 65、 68或 92时窗体关闭、程序结束 32 在窗体上画一个名为 Command1的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a
17、a Array(1， 2， 3， 4) j 1 For i 4 To 1 Step 1 s s a(i)* j j j * 10 Next i Print s End Sub 运行上面的程序，其输出结果是 ( )。 （ A） 1234 （ B） 12 （ C） 34 （ D） 4321 33 窗体上有一个名称为 Combo1的组合框，要求在其编辑区输入文本并按回车键后，编辑区中的文本被添加到列表中。下面能实现这一功能的是 ( )。 （ A） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As Integer) If KeyCode 1
18、3 Then Combo1.AddItem Combo1.Text End If End Sub （ B） Private Sub Combo1_KeyDown(KeyCode As Integer， Shift As Integer) If KeyCode 13 Then Combo1.AddItem Text1.Text End If End Sub （ C） Private Sub Combo1_Click() Combo1.AddItem Combo1.Text End Sub （ D） Private Sub Combo1_Click() Combo1.AddItem Text1.T
19、ext End Sub 34 工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是： Public x As Integer Private y As Integer 窗体文件的程序代码是： Dim a As Integer Private Sub Form_Load() Dim b As Integer a 2： b 3： x 10： y 20 End Sub Private Sub Command1_Click() a a 5： b b 5： x x 5： y y 5 Print a； b； x； y End Sub 运行程序，单击窗体上的命令按钮，则在窗体上显示的是 ( )。
20、（ A） 5 5 15 5 （ B） 7 5 15 25 （ C） 7 8 15 5 （ D） 7 5 15 5 35 某人编写了向随机文件中写一条记录的程序，代码如下： Type RType Name As String * 10 Tel As String * 20 End Type Private Sub Command1_Click() Dim p As RType p.Name InputBox(“姓名 “) p.Tel InputBox(“电话号 “) Open “Books.dat“ For Random As #1 Put #1， ， p Close #1 End Sub 该程
21、序运行时有错误，修改的方法是 ( )。 （ A）在类型定义 “Type RType“之前加上 “Private“ （ B） Dim p As RType必须置于窗体模块的声明部分 （ C）应把 Open语句中的 For Random 改为 For Output （ D） Put语句应该写为 Put #1， p.Name ， p.Tel 36 有如下程序： Private Sub Form_Click() Dim s As Integer， p As Integer p 1 For i 1 To 4 For j 1 To i s s j Next j p p * s Next i Print p
22、 End Sub 程序运行后，单击窗体，则输出结果是 ( )。 （ A） 90 （ B） 180 （ C） 400 （ D） 800 37 窗体上有 Command1、 Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a()As Integer， m As Integer Private Sub Command1_Click() m InputBox(“请输入一个正整数 “) ReDim a(m) End Sub Private Sub Command2_Click() m InputBox(“请输入一个正整数 “) ReDim a(m) End Sub 运
23、行程序时，单击 Command1后输入整数 10，再单击 Command2后输入整数 5，则数组 a中元素的个数是 ( )。 过程： （ A） 5 （ B） 6 （ C） 10 （ D） 11 38 在窗体上画一个命令按钮和一个标签，其名称分别为 Command1和 Label1，然后编写如下事件过程： Private Sub Command1_Click() Counter 0 For i 1 To 4 For j 6 To 1 Step 2 Counter Counter 1 Next j Next i Label1.Caption Str(Counter) End Sub 程序运行后，单
24、击命令按钮，标签中显示的内容是 ( )。 （ A） 11 （ B） 12 （ C） 16 （ D） 20 39 在窗体上画两个文本框 (名称分别为 Text1和 Text2)和一个命令按钮 (名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() x 0 Do While x50 x (x 2)*(x 3) n n 1 Loop Text1.Text Str(n) Text2.Text Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为 ( )。 Text2)和一个命令按钮 (名称为 Command1)，然后
25、编写如下事件过程： （ A） 1和 0 （ B） 2和 72 （ C） 3和 50 （ D） 4和 168 40 假定有以下程序段： For i 1 To 3 For j 5 To 1 Step 1 Print i*j Next j Next i 则语句 Print i * j 的执行次数是 ( )。 （ A） 15 （ B） 16 （ C） 17 （ D） 18 国家二级 VB机试（选择题）模拟试卷 26 答案与解析 一、选择题 1 【正确答案】 A 【试题解析】 结构化程序设计的思想包括：自顶向下、逐步求精、模块化、限制使用 goto语句，所以选择 A。 2 【正确答案】 C 【试题解析】
26、 在数据流图中，用标有名字的箭头表示数据流。在程序流程图中，用标有名字的箭头表示控制流。所以选择 C。 3 【正确答案】 C 【试题解析】 当有序线性表为顺序存储时才能用二分法查找。可以证明的是对于长度为 n 的有序线性表，在最坏情况下，二分法查找只需要比较 log2n 次，而顺序查找需要比较 n 次。 4 【正确答案】 A 【试题解析】 链式存储结构既可以针对线性结构也可以针对非线性结构，所以 B)与 C)错误。链式存储结构中每个结点都由数据域与指针域两部分组成 ，增加了存储空间，所以 D)错误。 5 【正确答案】 C 【试题解析】 编译软件、操作系统、汇编程序都属于系统软件，只有 C)教务
27、管理系统才是应用软件。 6 【正确答案】 A 【试题解析】 软件测试的目的是为了发现错误而执行程序的过程，并不涉及改正错误，所以选项 A)错误。程序调试的基本步骤有：错误定位、修改设计和代码，以排除错误、进行回归测试，防止引进新的错误。程序调试通常称为 Debug，即排错。软件测试的基本准则有：所有测试都应追溯到需求、严格执行测试计划，排除测试的随意性、充分注意测试中 的群集现象、程序员应避免检查自己的程序、穷举测试不可能、妥善保存测试计划等文件。 7 【正确答案】 V 【试题解析】 N S图提出了用方框图来代替传统的程序流程图，所以 A)不对。PAD图是问题分析图，它是继承程序流程图和方框图
28、之后提出的又一种主要用于描述软件详细设计的图形表示工具，所以 B)不对。 E R图是数据库中的用于表示E R模型的图示工具，所以 D)不对。根据图中所示表示方法是进行软件详细设计时使用的程序流程图。 8 【正确答案】 B 【试题解析】 数据库管理系统是数据库的机构，它是一 种系统软件，负责数据库中数据组织、数据操纵、数据维护、控制及保护和数据服务等。是一种在操作系统之上的系统软件。 9 【正确答案】 D 【试题解析】 自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以 B)错误。笛卡尔积是用 R集合中元素为第一元素， S 集合中
29、元素为第二元素构成的有序对，所以 C)错误。根据关系 T 可以很明显的看出是从关系 R与关系 S 中取得相同的关系组所以取得是交运算，选择 D)。 10 【正确答案】 C 【试题解析】 学 号是学生表 S 的主键，课号是课程表 C的主键，所以选课表 SC的关键字就应该是与前两个表能够直接联系且能唯一定义的学号和课号，所以选择 C。 11 【正确答案】 D 【试题解析】 本题用到了字符串处理函数 Mid、 Right和 left函数。 中部截取函数 Mid(C， N1， N2)，功能是从字符串 C中的 C1位置开始往后取 N2个字符，如果省略 N2，默认从 C1位置取出所有字符。 右部截取函数
30、Right(C， N)，功能是取字符串 C右边 N个字符。 左部截取函数 Left(C， N)，功能是取字符串 C左边 N个字符。 根据以上 函数用法，选项 A、 B、 C都能输出 “Program“， D选项是从字符串的最左边开始取 7个字符，结果为 VBProgr ，不能输出 “Program“，故 D选项错误。 12 【正确答案】 D 【试题解析】 一般情况下，输入程序时要求一行只写一条语句。但语句行较短时也可以将多个语句书写在同一行中，这时，语句之间使用冒号分隔。故 D选项错误。 13 【正确答案】 A 【试题解析】 定义函数过程的格式： Function 函数过程名 (形参表 )As
31、函数返回值的数据类型 函数过程名表达式 End Function 说明： 形参的类型可以是任何数据类型，函数返回值的类型是调用函数后返回的数据类型，他们没有关系，互不影响。故选项 A正确。 选项 B错误的原因是：函数过程中可以有多个 “函数过程名表达式 “这样的语句，但是最终函数只能有一个返回值。如果省略这条语句，函数过程则返回一个默认值，数值函数过程返回 0，字符串函数过程返回空字符串。 选项 C错误的原因是：数组作为函数过程的参数时，这时数组名看作是一个符号地址，实参和形参之间传递的是地址，所以以传址方式传递。 选项 D错误的原因是：形参如果没指明数据类型 ，默认为 Variant类型。
32、14 【正确答案】 C 【试题解析】 过程定义时，形参除了可以是整型、单精度、双精度等数据类型外，还可以是控件或窗口等对象型。相对应的调用过程时实参也可以是一般数据类型、控件名或窗体。故选项 A、 D正确。 调用过程时使用的实参的个数、类型、顺序应与过程中形参相同。故选项 B正确。 在过程调用时，不只是函数过程能把过程中处理的信息传回到调用程序中， Sub过程也可以。 Sub过程中形参声明时前面有关键字 ByRef或省略 ByRef(默认 )时，实参和形参之间传递的是地址， Sub过程 中形参的变化也会引起实参的变化，这样 Sub过程中处理的信息也可以传回调用程序中。故选项 C说法错误。 15
33、 【正确答案】 B 【试题解析】 标准模块中可以包含一个 Sub Main 过程，可以通过 “工程属性 “对话框中将 Sub Main过程设置启动对象。故 B选项错误。 16 【正确答案】 A 【试题解析】 动态数组的使用时，先在窗体层、标准模块或过程中声明一个没有下标的数组 (括号不能省略 )，不指定维数。然后，在过程中用 ReDim语句定义带下标的数组，给出数组的维数。注意：用 ReDim定义的数组， 只能改变数组元素的个数，不能改变数组的维数和数据类型。 本题选项 B、 C中 ReDim语句改变了数组的数据类型，故错误。选项 D中声明数组时有下标，应该没有下标，故也错误。选项 A正确。
34、17 【正确答案】 A 【试题解析】 设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。 18 【正确答案】 D 【试题解析】 VB 不要求必须先定义再使用。如果没有提前定义变量，就直接使用，系统就会将变量的数据类型指定为默认数据类型 Variant变体型。故选 D。 19 【正确答案】 B 【试 题解析】 用关系运算符比较两个操作数时，如果两个操作数是字符型的，按字符的 ASCII码从左到右一一比较，即先比较第 1个，若相同再比较第 2个，依次比较，直到比较完或不同为止。 选项 A中两个字符串前 2个字符相同，后 1个不同， “Z“的 ASCII值 “z“的ASCII值，故 “XY
35、Z“ “XYz“，结果应返回 Fasle。 选项 C中应该是两个字符串完全一样，才相等。很明显两个字符不相等，返回False。 选项 D中两个字符串前 3个字符一样，第 1个字符串比第 2个字符串长，“Integer“ “Int“，返回 False。 选 项 B中两个字符串不完全一样，有大写和小写的字符，不等。所以返回 True。故 B 选项正确。 20 【正确答案】 B 【试题解析】 UCase(Left(a$， 7)是从字符串 a的左边向右取出 7个字符，然后再全部转换为大写字母，结果是： “VISUAL “， Right$(a$， 12)是从字符串 a的右边向左取出 12个字符，结果为
36、“ Programming“， &是字符串连接符，把 “VISUAL “ & “C “ & “ Programming“ 连接在一起，合成字符串 “VISUAL C Programming“，并把它赋给字符串变量 c，所以字符串变量 c的值就是合成的字符串。故 B 选项正确。 21 【正确答案】 D 【试题解析】 本题中， Click是控件的名称， MouseDown 是鼠标按下事件，当用鼠标左键或右键单击 Click 控件时就会触发 MouseDown 事件，执行 MouseDown事件过程。故选 D。 22 【正确答案】 B 【试题解析】 运行程序，单击命令按钮后，执行 Command1_
37、Click 事件过程代码，文本框 Text1 中显示 “程序设计 “，并且文本框 Text1获 得焦点，此时焦点在Text1中；当 Text1 获得焦点就会触发它的 Got_Focus 事件，执行 Got_Focus 事件过程，结果文本框 Text1中显示 “等级考试 “。故 B 选项正确。 23 【正确答案】 C 【试题解析】 当鼠标在图片框 P1 中移动时，就会触发 P1 的鼠标移动事件，即P1_MouseMove事件，故排除 B 选项；鼠标在图片框 P1 中移动时，立即在图片框中显示鼠标的位置坐标，说明是在图片框上输出数据，所以用 P1 的 Print语句实现。故 C选项正确。 24 【
38、正确答案】 B 【试题解析】 窗体 的 BorderStyle属性是用来设置窗体的边框样式的。属性值 1为 Fixed Single,3 为 Fixed Dialog,4为 Fixed ToolWindow，设置为这 3个属性值都不能改变窗口大小。 2是 Sizable，表示窗体大小可以改变。故选 B。 25 【正确答案】 A 【试题解析】 的操作方法可使两个单选按钮属于同一个框架，其他方法不行。故 A选项正确。 26 【正确答案】 C 【试题解析】 组合框没有 Caption属性； Text属性用来设置或返回组合框中当前选项的文本内容； Selected 属性是列表框控件的属性，组合框没有
39、Selected 属性；List属性用来设置或返回组合框中的各选项，它是一个字符串数组，组合框中各选项内容用 List(下标 )表示。故 A、 B、 D选项错误， C选项正确。 27 【正确答案】 C 【试题解析】 调用通用对话框的 ShowOpen方法，只是显示文件 “打开 “对话框，如果 ShowOpen方法后面没有其他处理文件的代码，就不能实现打开文件的功能。故选项 C错误。 28 【正确答案】 C 【试题解析】 Caption 属性是设置或返回控件的标题。组合框没 有 Caption 属性。故选 C。 29 【正确答案】 B 【试题解析】 SetFocus 是控件获得焦点的方法， Go
40、tFocus是控件获得焦点后触发的事件， LostFocus 是控件失去焦点后触发的事件。本题中程序执行Text1.SetFocus 后， Text1就获得焦点，进而触发 Text1的 GotFocus 事件。故 B选项正确。 30 【正确答案】 C 【试题解析】 访问滚动条控件的值，可以直接使用控件的名称，也可以在名称后面指明 Value属性。滚动条位置是用数值来表示的，因此定义 Calc过程时 参数应该定义为 Integer类型。程序中， Text1.Text x*y语句说明计算的结果在文本框中显示出来。 31 【正确答案】 D 【试题解析】 程序 Do循环中嵌套了 For循环， Do循环
41、没有设置结束条件，而是在 For循环体中的 Select语句中设置了退出 Do循环和 For循环及结束程序的分支，因此 Do循环的次数无法确定。随机函数 Rnd 产生 0,1)之间的一个数，包括 0但不包含 1，因此 Rnd*100的范围是大于等于 0小于 100。随机数为 65、 68或 92时结束程序关闭窗体，为 58时退出 Do 循环，为 12时退出 For循环进入下一次Do循环。 32 【正确答案】 A 【试题解析】 33 【正确答案】 A 【试题解析】 在组合框中的输入的文本保存在它的 Text属性中，根据程序要求，只要判断按下了回车键后，使用组合框的 AddItem方法把 Text
42、中的字符添加到列表中即可。选项 C和 D没有判断是否按下回车键，所以排除。而选项 B中使用 AddItem方法添加的是 Text1.Text的值，不是组合框 Combo1 的 Text值，所以也不对。 34 【正确答案】 D 【试题解析】 程序在模块文件中定 义 x为整型全局变量，在整个工程中都起作用，而 y定义为整型私有变量，只能在本模块文件中起作用。在窗体文件中变量 a在本窗体文本中起作用，窗体加载事件中定义的变量 b 和没有声明的变量 y，只在本事件过程起作用。程序窗体加载时，对后边有影响的变量值为 a为 2， x为 10，没有指定初值的变量值默认为 0，因此单击命令按钮后， a a 5
43、 7， b b 55， x x 5 15， y y 5 5，结果输出 7 5 15 5。 35 【正确答案】 A 【试题解析】 记录类型的定义必须放在模块的声明部分，当在标准模块中定义时，关键 字 Type前可以有 Public(默认 )或 Private，而如果在窗体模块中定义，则必须在前面加上关键字 Private。 Open 语句中使用 For Random表示文件以随机方式存取。 Put语句的语法为： Put #文件号， 记录号 ，变量。其中 “变量 “是除对象变量和数组变量外的任何变量。 36 【正确答案】 D 【试题解析】 37 【正确答案】 B 【试题解析】 程序中 Option Base 0表示指定数组的下标默认下界为 0。 ReDim语句用来重新定义动态数组，按定义的上下界重新分配存储单元 。在一个程序中，可以多次用 ReDim语句定义同一个数组，随时修改数组中元素的个数。程序中先执行 ReDim a(10)，然后执行了 ReDim a(5)，因此数组 a的下界为 0，上界为5，共有 6个元素。 38 【正确答案】 B 【试题解析】 39 【正确答案】 B 【试题解析】 40 【正确答案】 A 【试题解析】
