1、国家二级 VB机试（选择题）模拟试卷 36 及答案与解析 一、选择题 1 下列数据结构中，能够按照 “先进后出 “原则存取数据的是 ( )。 （ A）循环队列 （ B）栈 （ C）队列 （ D）二叉树 2 下列数据结构中，属于非线性结构的是 ( )。 （ A）循环队列 （ B）带链队列 （ C）二叉树 （ D）带链栈 3 软件设计中模块划分应遵循的准则是 ( )。 （ A）低内聚低耦合 （ B）高内聚低耦合 （ C）低内聚高耦合 （ D）高内聚高耦合 4 在软件开发中，需求分析阶段产生的主要文档是 ( )。 （ A）可行性分析报告 （ B）软件需求规格说明书 （ C）概要设计说明书 （ D）集
2、成测试计划 5 数据流图中带有箭头的线段表示的是 ( )。 （ A）控制流 （ B）事件驱动 （ C）模块调用 （ D）数据流 6 在软件开发中，需求分析阶段可以使用的工具是 ( )。 （ A） N S图 （ B） DFD图 （ C） PAD图 （ D）程序流程图 7 耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是 ( )。 （ A）提高耦合性降低内聚性有利于提高模块的独立性 （ B）降低耦 合性提高内聚性有利于提高模块的独立性 （ C）耦合性是指一个模块内部各个元素间彼此结合的紧密程度 （ D）内聚性是指模块间互相连接的紧密程度 8 数据库应用系统中的核心问题是 ( )。 （
3、 A）数据库设计 （ B）数据库系统设计 （ C）数据库维护 （ D）数据库管理员培训 9 在 E R图中，用来表示实体联系的图形是 ( )。 （ A）椭圆形 （ B）矩形 （ C）菱形 （ D）三角形 10 有三个关系 R、 S和 T如下：则关系 T是由关系 R和 S通过某种操作得到，该操作为 ( )。 （ A）选择 （ B）投影 （ C）交 （ D）并 11 以下叙述中错误的是 ( )。 （ A）标准模块文件的扩展名是 .bas （ B）标准模块文件是纯代码文件 （ C）在标准模块中声明的全局变量可以在整个工程中使用 （ D）在标准模块中不能定义过程 12 （ A） 1 （ B） 0 （
4、C） 3 （ D）出现错误提示 13 设 a 4， b 5， c 6，执行语句 Print a b And b c后，窗体上显示的是( )。 （ A） True （ B） False （ C）出错信息 （ D） 0 14 执行下列语句： strInput InputBox(“请输入字符串 “， “字符串对话框 “， “字符串 “) 将显示输入对话框。此时如果直接单击 “确定 “按钮，则变量 strInput的内容是( )。 （ A）请输入字符串 （ B）字符串对话框 （ C）字符串 （ D）空字符串 15 以下变量名中合法的是 ( )。 （ A） x2 1 （ B） print （ C） st
5、r_n （ D） 2x 16 把数学表达式 表示为正确的 VB表达式应该是 ( )。 （ A） (5x 3)/(2y 6) （ B） （ C） （ D） (x*5 3)/(y*2 6) 17 下面是求最大公约数的函数的首部： Function gcd(ByVal x As Integer， ByVal y As Integer)As Integer 若要输出 8、 12、 16这 3个数的最大公约数，下面正确的语句是 ( )。 （ A） Print gcd(8,12)， gcd(12,16)， gcd(16,8) （ B） Print gcd(8,12,16) （ C） Print gcd(8
6、)， gcd(12)， gcd(16) （ D） Print gcd(8， gcd(12,16) 18 若在窗体模块的声明部分声明了如下自定义类型和数组： Private Type rec Code As Integer Caption As String End Type Dim arr(5)As rec 则下面的输出语句中正确的是 ( )。 （ A） Print arr.Code(2)， arr.Caption(2) （ B） Print arr.Code， arr.Caption （ C） Print arr(2).Code， arr(2).Caption （ D） Print Code
7、(2)， Caption(2) 19 为把圆周率的近似值 3.14159存放在变量 pi中，应该把变量 pi定义为 ( )。 （ A） Dim pi As Integer （ B） Dim pi(7)As Integer （ C） Dim pi As Single （ D） Dim pi As Long 20 （ A） 30 （ B） 31 （ C） 49 （ D） 48 21 设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表项内容的是 ( )。 （ A） List1.List （ B） List1.ListIndex （ C） List1.Text （ D）
8、List1.Index 22 在窗体上画一个文本框 (名称为 Text1)和一个标签 (名称为 Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是 ( )。 （ A） Private Sub Text1_Change() Label1.Caption Str(Len(Text1.Text) End Sub （ B） Private Sub Text1_Click() Label1.Caption Str(Len(Text1.Text) End Sub （ C） Private Sub Text1_Change() La
9、bel1.Caption Text1.Text End Sub （ D） Private Sub Label1_Change() Label1.Caption Str(Len(Text1.Text) End Sub 23 设窗体上有名称为 Option1的单选按钮，且程序中有语句： If Option1.Value True Then 下面语句中与该语句不等价的是 ( )。 （ A） If Option1.Value Then （ B） If Option1 True Then （ C） If Value True Then （ D） If Option1 Then 24 设窗体上有 1个水平
10、滚动条，已经通过属性窗口把它的 Max属性设置为 1，Min属性设置为 100。下面叙述中正确的是 ( )。 （ A）程序运行时，若使滚动块向左移动，滚动条的 Value属性值就增加 （ B）程序运行时，若使滚动块向左移动，滚动条的 Value属性值就减少 （ C）由于滚动条的 Max属性值小于 Min属性值，程序会出错 （ D）由于滚动条的 Max属性值小于 Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动 25 为了对多个控件执行操作，必须选中这些控件。下列不能选中多个控件的操作是 ( )。 （ A）按住 Alt键，不要松开，然后单击每个要选中的控件 （ B）按住 Shift
11、键，不要松开，然后单击每个要选中的控件 （ C）按住 Ctrl键，不要松开，然后单击每个要选中的控件 （ D）拖动鼠标画出一个虚线矩形，使所选中的控件位于这个矩形内 26 在窗体上画一个文本框，其名称为 Text1，为了在程序运行后隐藏该文本框，应使用的语句为 ( )。 （ A） Text1.Clear （ B） Text1.Visible False （ C） Text1.Hide （ D） Text1.Enabled False 27 设窗体上有一个标签 Label1和一个计时器 Timer1， Timer1的 Interval属性被设置为 1000， Enabled属性被设置为 True
12、。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是 ( )。 （ A） Private Sub Timer1_Timer() Label1.Caption True End Sub （ B） Private Sub Timer1_Timer() Label1.Caption Time$ End Sub （ C） Private Sub Timer1_Timer() Label1.Interval 1 End Sub （ D） Private Sub Timer1_Timer() For k 1 To Timer1.Interval Label1.Caption
13、Timer Next k End Sub 28 窗体上有 一个名称为 CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1，其下标从左到右分别为 0、 1、 2、 3，窗体外观如图所示。命令按钮的事件过程如下： Private Sub Command1_Click(Index As Integer) Select Case Index Case 0 CD1.Action 1 Case 1 CD1.ShowSave Case 2 CD1.Action 5 Case 3 End End SelectEnd Sub对上述程序，下列叙述中错误的是 ( )。 （ A）单击 “打开 “按钮
14、，显示打开文件的对话框 （ B）单击 “保存 “按钮，显示保存文件的对话框 （ C）单击 “打印 “按钮，能够设置打印选项，并执行打印操作 （ D）单击 “退出 “按钮，结束程序的运行 29 用来设置文字字体是否斜体的属性是 ( )。 （ A） FontUnderline （ B） FontBold （ C） FontSlope （ D） FontItalic 30 窗体上有一个名称为 Timer1的计时器控件，一个名称为 Shape1的形 状控件，其 Shape属性值为 3(Circle)。编写程序如下： Private Sub Form_Load() Shape1.Top 0 Timer1
15、.Interval 100 End Sub Private Sub Timer1_Timer() Static x As Integer Shape1.Top Shape1.Top 100 x x 1 If x Mod 10 0 Then Shape1.Top 0 End If End Sub 以下关于上述程序的叙述中，错误 的是 ( )。 （ A）每执行一次 Timer1_Timer事件过程， x的值都在原有基础上增加 1 （ B） Shape1每移动 10次回到起点，重新开始 （ C）窗体上的 Shape1由下而上移动 （ D） Shape1每次移动 100 31 现有如下程序： Priv
16、ate Sub Command1_Click() s 0 For i 1 To 5 s s f(5 i) Next Print s End Sub Public Function f(x As Integer) If x 10 Then t x 1 Else t x 2 End If f t End Function 运行程序，则窗体上显示的是 ( )。 （ A） 38 （ B） 49 （ C） 61 （ D） 70 32 窗体上有一个名称为 Picture1的图片框控件，一个名称为 Label1 的标签控件，如图所示。 现有如下程序： Public Sub display(x As Cont
17、rol) If TypeOf x Is Label Then x Caption “计算机等级考试 “ Else xPicture LoadPicture(“pic.jpg“) End IfEnd SubPrivate Sub Label1_Click() Call display(Label1)End SubPrivate Sub Picture1_Click() Call display(Picture1)End Sub对以上程序，下列叙述中错误的是 ( )。 （ A）程序运行时会出错 （ B）单击图片框，在图片框中显示一幅图片 （ C）过程中的 x是控件变量 （ D）单击标签，在标签中显
18、示一串文字 33 设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String， strL As Integer tStr “ strL Len(xStr) i 1 Do While iMin 属性值时，滚动块向右移动 Value属性值增加，向左移动 Value属性值减少；反之，当 MaxMin 属性值时，滚动块向右移动 Value属性值减少，向左增加；当它们 Max Min时，滚动块不能移动。故 A选项正确。 25 【正确答案】 A 【试题解析】 按住 Alt键只能选中单个控件，不能同时选中多个控件。故 选
19、 A。 26 【正确答案】 B 【试题解析】 文本框没有 Clear和 Hide方法，故 A、 C选项错误； Enabled 属性设置文本框可用不可用，属性值为 True时可在文本框中输入数据，为 False时文本框为灰色，内容不能修改，故 D选项错误； Visible属性用来设置文本框显示或隐藏，当属性值为 True时文本框显示，为 False时文本框隐藏，故 B 选项正确。 27 【正确答案】 B 【试题解析】 Timer1 的 Interval 属性值是 1000， Enabled 属性为 True，说明定时器开始工作，每 隔 1000毫秒 (即 1秒 )触发一次 Timer事件，从而执
20、行一次Timer事件过程。要想每秒在标签中显示一次系统时间，则在 Timer 事件过程中把系统时间赋给标签的 Caption 属性就能实现。故选 B。 28 【正确答案】 C 【试题解析】 通用对话框中 Action 1，或用 ShowOpen 方法都可显示 “打开 “文件对话框； Action 2，或用 ShowSave方法都可显示文件 “另存为 “对话框； Action 3，或用 ShowColor方法都可显示 “颜色 “对话框； Action 4，或用 ShowPrint方法都可显示 “字体 “对话框； Action 5，或用 ShowHelp 方法都可显示 “打印 “对话框； 本题中，
21、 “打开 “、 “保存 “、 “打印 “、 “退出 “按钮的下标 (即 Index 值 )分别是 0、1、 2、 3，用 Index 值区分各命令按钮。 当 Index 0时， CD1.Action 1，说明单击 “打开 “按钮，会显示 “打开 “文件对话框； 当 Index 1时， CD1.ShowSave，说明单击 “保存 “按钮，会显示文件 “另存为 “对话框；当 Index 3时， End，说明单击 “退出 “按钮，会结束程序运行。故 A、B、 D选项正确。 当 Index 2时， CD1.Action 5，说明单击 “打印 “按钮，会显示 “打印 “对话框，但打开对话框后，只能设置打
22、印选项，不能执行打印操作。故 C选项错误。 29 【正确答案】 D 【试题解析】 FontUnderline 属性设置文字是否有下划线； FontBold 属性是设置文字是否加粗； FontItalic属性是设置文字是否斜体；没有 FontSlope属性。故选D。 30 【正确答案】 C 【试题解析】 题目中变量 x定义为 Static，即每次进入 Timer事件过程时， x都会保留上次的值，从而 实现每执行一次 Timer1_Timer事件过程 x的值都在原有基础上增加 1。程序中判断调用 Timer事件过程 10次后，重置 Shape1 的 top值为0，即回到起点。控件 Shape1 的
23、 Top属性是距离窗体顶的位置，数值越大距离越远，因此 Shape1 会由上向下移动。 31 【正确答案】 B 【试题解析】 程序中过程 f的功能是参数值大于等于 10时，返回参数加 1的值，否则返回参数加 2的值。因此按钮事件中 s值的计算过程如下： i 1时， s 0 f(5 1) 8； i 2时， s 8 f(5 2) 8 9 17； i 3时， s 17 f(5 3) 17 10 27； i 4时， s 27 f(5 4) 27 11 38； i 5时， s 38 f(5 5) 38 11 49； 因此最终在窗体上输出的是 49。 32 【正确答案】 A 【试题解析】 程序中定义了一个
24、过程 display(x as Control)，它的参数 x是一个控件变量。当单击 Picture1控件或 Label1 控件时，都会调用 display 过程，而传入的参数分别是这两个参数的控件名，在 display 过程中程序判断参数传入控件的类型，如果是标签控件， 就在它的标题上显示 “计算机等级考试 “，否则就认为是图片控件，就在图片框中加载一个图片显示出来。程序运行正常，因此 A选项错。 33 【正确答案】 C 【试题解析】 通用过程 Fun 的主要功能在于 tStr tStr & Mid(xStr， i， 1)& Mid(xStr， strL i 1， 1) 这一句。其中 Mid
25、(xStr， i， 1)的意思是从字符串的左边开始依次取一个字符，Mid(xStr， strL i 1， 1)的意思是从串的右边开始依次取一个字符。整个这条一语句的用意就是从一个字符串两端 依次各取一对字符连成一个字符串。因此当Fun 过程的参数为 “abcdef“时，返回值为 “afbecd“， Ucase(“afbecd“)结果为“AFBECD“，这就是输出结果。 34 【正确答案】 B 【试题解析】 原程序的错误在于没有把 n 的值乘进去。而 B 选项中把 For k n 1 To 2 Step 1 改为 For k 1 To n 1，依然没有把 n乘进去。 35 【正确答案】 D 【试
26、题解析】 控件数组与数据数组一样下标默认从 0开始，即本题中按钮控件数组的 Index值为 0,1,2，分别 对应命令按钮 1、命令按钮 2、命令按钮 3。当单击命令按钮 2时， Index 值为 1，因此程序会输出 “计算机等级考试 “。 36 【正确答案】 B 【试题解析】 本题主要考查算术运算符中的幂运算，在程序中 x的值为 k的 k 次方的 a次方， k 的值每次循环都加 1，但 a的值不变总为 0，除 0以外的任何数的0次方都是 1，因此，在 k 的值变为 4之前会输出三个 1。 37 【正确答案】 A 【试题解析】 题目程序的功能为，当单击命令按钮时， Text1 失去焦点，激发T
27、ext1的 LostFocus 事件，在此事件中，程序判断文 本框中字符串是否为“BASIC“，如果是则退出事件过程，继续执行命令按钮的单击事件过程，文本框中显示 “Visual Basic“，如果不是则文本框内容置空，焦点返回到文本框中等待输入，不会执行命令按钮的单击事件过程。题目中输入了 “Basic“，与 “BASIC“不符，因此文本框置空，焦点回到文本框中。 38 【正确答案】 D 【试题解析】 39 【正确答案】 A 【试题解析】 40 【正确答案】 A 【试题解析】 从程序中可知，数组 M元素 M(1) M(10)的值为 11、 10、 9、 8、7、 6、 5、 4、 3、 2。则 M(8)的值为 4， M(2 M(8)即 M(2 4)，即 M(6)。 M(6)的值为 6。因此窗体上显示为 6。
