1、国家二级 VB机试（选择题）模拟试卷 16 及答案与解析 一、选择题 1 下列叙述中正确的是 （ A）程序执行的效率与数据的存储结构密切相关 （ B）程序执行的效率只取决于程序的控制结构 （ C）程序执行的效率只取决于所处理的数据量 （ D）以上说法均错误 2 下列与队列结构有关联的是 （ A）函数的递归调用 （ B）数组元素的引用 （ C）多重循环的执行 （ D）先到先服务的作业调度 3 （ A） DYBEAFCZX （ B） YDEBFZXCA （ C） ABDYECFXZ （ D） ABCDEFXYZ 4 一个栈的初始状态为空。现将元素 1,2,3,A,B,C依次入栈，然后再依次出栈，则
2、元素出栈的顺序是 （ A） 1,2,3,A,B,C （ B） C,B,A,1,2,3 （ C） C,B,A,3,2,1 （ D） 1,2,3,C,B,A 5 下面属于白盒测试方法的是 （ A）等价类划分法 （ B）逻辑覆盖 （ C）边界值分析法 （ D）错误推测法 6 下面对对象概念描述正确的是 （ A）对象间的通信靠消息传递 （ B）对象是名字和方法的封装体 （ C）任何对象必须有继承性 （ D）对象的多态性是指一 个对象有多个操作 7 软件设计中模块划分应遵循的准则是 （ A）低内聚低耦合 （ B）高耦合高内聚 （ C）高内聚低耦合 （ D）以上说法均错误 8 下面描述中不属于数据库系统特
3、点的是 （ A）数据共享 （ B）数据完整性 （ C）数据冗余度高 （ D）数据独立性高 9 数据库设计过程不包括 （ A）概念设计 （ B）逻辑设计 （ C）物理设计 （ D）算法设计 10 （ A）自然连接 （ B）交 （ C）投影 （ D）并 11 下面操作中，不能正确保存正在编辑的工程的是 （ A）鼠标 右键单击 “工程资源管理器窗口 “中该工程的图标，在弹出的菜单中选 “保存工程 “ （ B）单击 “文件 “菜单，在下拉菜单中选 “保存工程 “ （ C）单击 “工程 “菜单，在下拉菜单中选 “保存工程 “ （ D） 12 下面为单精度实型（即单精度浮点型）变量的是 （ A） x$ （
4、 B） x sign = -sign Next k End Sub 程序运行后，单击命令按钮 Command1，输出结果是 （ A） 3 -1 2 -3 -1 （ B） 3 5 8 13 21 （ C） -1 1 -2 -1 -1 （ D） 3 4 5 6 7 34 有下面程序代码： Private Sub Command1_Click() Dim a As String a = “COMPUTER“ n = search(a, “T“) Print IIf(n = 0, “未找到 “, n) End Sub Private Function search(str As String, ch
5、As String) As Integer For k = 1 To Len(str) c = Mid(str, k, 1) If c = ch Then search = k Exit Function End If Next k search = 0 End Function 程序运行后，单击命令按钮 Command1，输出结果是 （ A） 0 （ B） 8 （ C） 6 （ D）未找到 35 有下面程序代码： Private Sub Command1_Click() a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) n = UBound(a) For k
6、= 0 To UBound(a) / 2 Print a(k) * a(n); n = n - 1 Next k End Sub 程序运行后，单击命令按钮 Command1，输出结果是 （ A） 2 6 12 20 30 （ B） 2 12 20 56 90 （ C） 30 28 24 18 10 （ D） 10 18 24 28 30 36 有下面程序代码： Private Sub Command1_Click() Dim x As Integer, s As Integer x = 1 For k = 1 To 3 x = x + 1 proc x s = s + x Next k Pri
7、nt s End Sub Private Sub proc(ByVal a As Integer) Static x As Integer x = x + 1 a = a + x End Sub 程序运行 后，单击命令按钮 Command1，输出结果是 （ A） 6 （ B） 9 （ C） 15 （ D） 19 37 窗体上有 1个 Timer1计时器， 1个 Shape1 形状控件，还有下面程序代码： Dim flag As Boolean Private Sub Form_Load() flag = True Timer1.Enabled = True Timer1.Interval =
8、1000 End Sub Private Sub Timer1_Timer() If flag Then Shape1.Height = Shape1.Height * 2 Shape1.Width = Shape1.Width * 2 Else Shape1.Height = Shape1.Height * 0.5 Shape1.Width = Shape1.Width * 0.5 End If flag = Not flag End Sub 执行程序所产生的效果是 （ A） Shape1形状的尺寸在缩小到原来一半和恢复原状这 2种状态间切换，每秒切换一次 （ B） Shape1形状的尺寸在
9、扩大到原来 2倍和恢复原状这 2种状态间切换，每秒切换一次 （ C） Shape1形状的尺寸在缩小到原来一半和扩大到原来 2倍这 2种状态间切换，每秒切换一次 （ D） Shape1形状的尺寸会不断扩大 38 有下面程序代码： Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer, x, b x = InputBox(“请输入一个多位整数 “) For k = 1 To Len(x) b = Mid(x, k, 1) a(Val(b) + 1) = a(Val(b) + 1) + 1 Next k For k = 1 T
10、o 10 Print a(k); Next k End Sub 程序运行时，单击命令按钮 Command1，输入 2355270224，则输出是 （ A） 1 0 4 1 1 2 0 1 0 0 （ B） 0 4 1 1 2 0 1 0 0 0 （ C） 2 3 5 5 2 7 0 2 2 4 （ D） 4 2 2 0 7 2 5 5 3 2 39 设窗体上有 Text1、 Text2两个文本框，并编写了下面的程序代码： Private Sub Text1_KeyPress(KeyAscii As Integer) If “A“ = Chr(KeyAscii) And Chr(KeyAscii
11、) = “Z“ Then KeyAscii = KeyAscii + (Asc(“a“) - Asc(“A“) End If n = 0 If KeyAscii = 13 Then For k = 1 To Len(Text1) ch$ = Mid(Text1, k, 1) If “a“ = ch And ch = “z“ Then n = n + 1 Next k Text2 = n End If End Sub 程序运行时，在 Text1文本框中输入 “Visual Basic 6.0“后按回车键，则在 Text2文本框显示的是 （ A） 11 （ B） 16 （ C） Visual Ba
12、sic 6.0 （ D） visual basic 6.0 40 工程中有 Form1、 Form2两个窗体（ Form1中有文本框 Text1； Form2中有Text1文本框和 Command1命令按钮）。 Form1是启动窗体。在这些模块中编写下面的程序代码： Form1中的代码如下： Private Sub Text1_DblClick() Text1 = “VisualBasic“ Form2.Show End Sub Form2中的代码如下： Private Sub Command1_Click() Text1 = Form1.Text1 Form1.Show End Sub 下面
13、关于程序的叙述中错误的是 （ A）双击 Form1的 Text1后 , Text1中显示 “VisualBasic“，弹出 Form2 （ B）双击 Form1的 Text1后， Form2成为当前窗体 （ C）单击 Form2的命令按钮， Form1成为当前窗体 （ D） Form2的 Text1 = Form1.Text1语句不能正确执行 国家二级 VB机试（选择题）模拟试卷 16 答案与解析 一、选择题 1 【正确答案】 A 【试题解析】 程序执行的效率与数据的存储结构、数据的逻辑结构、程序的控制结构、所处理的数据量等有关。 2 【正确答案】 D 【试题解析】 队列的修改是依先进先出的原
14、则进行的， D正确。 3 【正确答案】 C 【试题解析】 前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中，首先访问根结点，然后遍历左子树，最后遍历右子树；并且，在遍历左右子树时，仍然先访问根结点，然后遍历左子树，最后遍历右子树。前序遍历描述为：若二叉树为空，则执行空操作。否则： 访问根结点； 前序遍历左子树； 前序遍历右子树， C正确。 4 【正确答案】 C 【试题解析】 栈的修改是按后进先出的原则进行的，所以顺序应与入栈顺序相反，故选 C。 5 【正确答案】 B 【试题解析】 白盒测试法主要有逻辑覆盖、基本路径测试等。逻辑覆盖测试包括语句覆盖、路径覆盖、判定覆盖、条件覆盖、判断 -
15、条件覆盖，选择 B。其余为黑盒测试法。 6 【正确答案】 A 【试题解析】 对象之间进行通信的构造叫做消息， A正确。多态性是指同一个操作可以是不同对象的行为， D错误。对象不一定必须有继承性， C错 误。封装性是指从外面看只能看到对象的外部特征，而不知道也无须知道数据的具体结构以及实现操作， B 错误。 7 【正确答案】 C 【试题解析】 根据软件设计原理提出如下优化准则： 划分模块时，尽量做到高内聚、低耦合，保持模块相对独立性，并以此原则优化初始的软件结构。 一个模块的作用范围应在其控制范围之内，且判定所在的模块应与受其影响的模块在层次上尽量靠近。 软件结构的深度、宽度、扇入、扇出应适当。
16、 模块的大小要适中。 C正确。 8 【正确答案】 C 【试题解析】 数据库系统的特点为高共享 、低冗余、独立性高、具有完整性等，C错误。 9 【正确答案】 D 【试题解析】 数据库设计过程主要包括需求分析、概念结构设计、逻辑结构分析、数据库物理设计、数据库实施、数据库运行和维护阶段。答案为 D选项。 10 【正确答案】 A 【试题解析】 关系 R和关系 S 有公共域，关系 T 是通过公共域的等值进行连接的结果，符合自然连接，选 A。 11 【正确答案】 C 【试题解析】 工程的下拉菜单中没有 “保存工程 “。 12 【正确答案】 C 【试题解析】 $：字符串型， &：长整型， !：单精度实型，
17、 #：双精度实型。 13 【正确答案】 D 【试题解析】 本题考查 Rnd 随机函数和 Int取整函数，首先 Rnd随机函数的范围为 0,1)， Int函数的作用是返回不大于自变量的最大整数，所以当 Rnd * 5后变为 0,5)，再加上 20变为 20,25)，经取整后变为 20,24，所以本题的正确答案是选项 D。 14 【正确答案】 A 【试题解析】 整除运算 ()的结果是商的整数部分。例如， 72表示整除，商为 4.5,结果取整数部分 3,不进行四舍五入。如果参加整除的操作数是浮点数 ，则先按四舍五入的原则将它们变成整数，然后再执行整除运算。例如，对于 8.52,先将 8.5变成 9再
18、进行整除，商为 4.5,结果为 4。 取余运算 (Mod)是求两个整数相除后的余数。如果参加取余运算的操作数是浮点数，则先按四舍五入的原则将它们变成整数，然后再执行取余运算。例如，对于8.52.1,先将 8.5变成 9,2.1变成 2,然后 9除以 2与 1,因此取余结果为 1。 算术运算符的优先级：先乘除，后加减；乘方优先于乘除；函数优先于乘方；Mod 次于乘除而优先于加减；括号最优先。 本题中， x 100结果为 8， (x Mod 100) 10结果为 4， x Mod 10结果为 5，所以输出为 17，选项 A）正确。 15 【正确答案】 C 【试题解析】 在题目已给语句中， Inpu
19、tBox 函数使用了 3个参数：第一个参数 “字符串 “用于显示信息；第二个参数 “输入 “用来显示对话框的标题；第三个参数 “请输入 “是默认输入值，在输入区显示出来。选项 C）正确。 16 【正确答案】 D 【试题解析】 While语句不能描述选择结构。 17 【正确答案】 D 【试题解析】 Array 函数只能给变体类型变量数组初始化，所 以选项 D正确。 18 【正确答案】 D 【试题解析】 在 Visual Basic中有两类过程：一类是系统提供的内部函数和事件过程；另一类是用户根据自己的需要定义的，供事件过程的多次调用。在第二类过程中，涉及最多的是子过程。它们的共同点是完成某种特定
20、功能的一组程序代码；不同的是函数是可以直接返回值的特殊过程，所以函数过程定义时有返回值的类型说明。 两者最大的区别就是 Sub过程的过程不能直接返回值，而 Function 过程能直接返回值。 19 【正确答案】 B 【试题解析】 用户可以利用 Type语句定义自己的数据类型，其格式如下： Type 自定义类型名 元素名 (下标 ) As 类型名 元素名 (下标 ) As 类型名 End Type 要表示某个自定义数据类型的变量中某个元素时，形式如下：变量名 .元素名。所以选项 B)是正确的。 20 【正确答案】 D 【试题解析】 VB 应用程序可以把一个二维表格中的数据存入文件。 21 【正
21、确答案】 A 【试题解析】 根据题意，选中该文本框，在属性窗口中把 Text属性的值改为“VB“。 22 【正确答案】 D 【试题解析】 形状控件不响应 Click事件。 23 【正确答案】 C 【试题解析】 在程序运行过程中，可以改变命令按钮的标题。 24 【正确答案】 B 【试题解析】 在鼠标单击事件过程中， Button 属性值为 1时代表按下鼠标左键，值为 2时代表按下鼠标右键，单击鼠标左键或者右键都能触发 MouseDown 事件。Value属性值决定每个复选框的选中状态： 0为未选、 1为选中、 2为不可用 (以灰色呈现 )。选 B）。 25 【正确答案】 C 【试题解析】 滚动条
22、的 Value属性用于设置滚动滑块所处的位置。 Max和 Min属性分别设置滚动条的最大值和最小值，水平滚动条的最左端为 Min，最右端为Max， Max的值减去 Min 的值得到当前滚动条的刻度个数。单击 Option2 单选按钮，滚动滑块的位置设置为 50，正好在整个滚动条的中间位置。因此，答案为C）。 26 【正确答案】 B 【试题解析】 List 控件的 ListCount属性返回列表部分项目的个数。List1.ListCount - 1是倒数第二个。故答案选 B）。 27 【正确答案 】 C 【试题解析】 过程 Timer1_Timer()按计时器的 Interval 属性值定时运行
23、。该属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为 0 65535，因此其最大时间间隔不能超过 65秒。文本框中显示值是 100时，表示 Timer1_Timer()运行了 100次，则运行时间是 100*500毫秒 =50秒。所以本题答案为 C）。 28 【正确答案】 C 【试题解析】 MouseMove中 Button 是一个整数，它对应鼠标各个按钮的状态，如果某个按钮按下，其中就有一个二进制位被设置。 Button 参数是具有相应于左按钮（位 0），右按钮（位 1），以及中间按钮（位 2）的一个位字段。这些位的值分别等于 1， 2，和 4。它指示这些鼠标按钮的整体状态；三个二
24、进制位中的一些、全部、或一个也没有被设置，指示这些按钮中的一些、全部、或一个也没有被按下。程序中 Button = 2表示鼠标右键被按下。故答案选 C。 29 【正确答案】 A 【试题解析】 控件数组的 Index属性，标识数组中的每个控件，使之与其他控件能够区分开来，索引在内部 (就是在一个集合中，其他集合的索引与这个集合的索引无关 )必须是唯一的，不能与其他相同。故答案选 A）。 30 【正确答案】 A 【试题解析】 Click 事件在鼠标单击时触发，要使得选中菜单项就执行某种操作，可以在 Click 事件过程中编写需要执行的操作代码。 A）正确。 VB 中的菜单项不管是同级还是不同级都不
25、允许同名， B）错误。一般情况下，不显示弹出式菜单。需要时用 PopupMenu 方法显示弹出式菜单。 C）错误。 VB中允许有多级弹出式菜单， D）错误。 31 【正确答案】 B 【试题解析】 For循环用来对 x赋值。步长为 -1，一共执行 5 次，第一次执行 完后 x=5，第二次执行完后 x=54，以此类推，选 B）。 32 【正确答案】 C 【试题解析】 Mod 为求余函数。 For循环执行 5次。第一次执行时 a Mod k 的值为 0，则 s=0， a=4；循环继续直到 k=5退出。分步计算可得最后 s=4，选 C）。 33 【正确答案】 A 【试题解析】 For循环执行 5次，按
26、公式计算可得，结果选 A）。 34 【正确答案】 C 【试题解析】 Mid 函数从字符串中获取指定位置的字符值。 Search 函数中找到相同的字符时退出循环，并返回该字符在字串中的位置 。 Command1_Click 事件中打印查找的结果。选 C）。 35 【正确答案】 D 【试题解析】 UBound 获取数组 a的上标值， n=9。 For循环边界为 0至 4。每次执行 For的循环体时均会进行打印。选 D）。 36 【正确答案】 B 【试题解析】 ByVal表示参数传递时是值传递。不改变实参的值。Command1_Click 事件中 proc x语句不改变 x的值。因此可直接按照 fo
27、r循环的规律计算 s的值。选 B）。 37 【正确答案】 B 【试题解析】 Form_Load 过程中设 定 timer事件定时触发，定时时间为 1秒；在Timer1_Timer过程中， Shape1 形状的尺寸在扩大到原来 2倍和恢复原状，然后退出。下一次 timer事件触发时继续这个过程。因此，选 B）。 38 【正确答案】 A 【试题解析】 Len 函数获取整数的位数并作为 For循环的边界。 Mid 函数从循环变量指定的地方获取字符并赋值给 b。 Val函数取 b的数值。 For循环完成对数组a的元素赋值。第二个 for循环进行打印。选 A）。 39 【正确答案】 A 【试题解析】 Text1_KeyPress 过程中 ，先把输入的字符串中大小字母变成小写字母。当按下回车键后，执行 For循环统计小写字母的个数。退出循环后把 n 值赋给 Text2。选 A）。 40 【正确答案】 D 【试题解析】 本题考察窗体切换的知识。双击 Form1的 Text1 时触发Text1_DblClick 事件， Text1中显示 “VisualBasic“，弹出 Form2，此时， Form2成为当前窗体；单击 Form2的命令按钮时触发 Command1_Click 事件， Form1成为当前窗体。选 D）。
