国家二级（VB）机试模拟试卷209
选择题
1.耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是( )。(B)
A. 提高耦合性降低内聚性有利于提高模块的独立性
B. 降低耦合性提高内聚性有利于提高模块的独立性
C. 耦合性是指一个模块内部各个元素间彼此结合的紧密程度
D. 内聚性是指模块间互相连接的紧密程度
解析：模块独立性是指每个模块只完成系统要求的独立的子功能，并且与其他模块的联系最少且接口简单。一般较优秀的软件设计，应尽量做到高内聚，低耦合，即减弱模块之间的耦合性和提高模块内的内聚性，有利于提高模块的独立性，所以A错误，B正确。耦合性是模块间互相连接的紧密程度的度量而内聚性是指一个模块内部各个元素间彼此结合的紧密程度，所以C与D错误。
2.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是( )。(C)
A. -36
B. 1
C. -1
D. -72
解析：Sgn函数是判断输入参数正负的函数，返回表示数字符号的整数。Sgn(number)函数中的number参数可以是任意有效的数值表达式。如果number大于零则返回1、等于零则返回0、小于零则返回-1，题中Sgn(-6^2)结果为-1。Abs函数是求表达式绝对值，其函数格式为：Abs(＜数值表达式＞)，Abs函数返回值类型与数值表达式的数据类型相同，题中Abs(-6＾2)结果为36。Int函数的返回值类型为int型的数据，题中Int(-6＾2)结果为-36。因此最后的结果是-1。
3.窗体上有一个名称为Optionl的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程
Private Sub Optionl_click(Index As Integer)
End Sub
下面关于此过程的参数Index的叙述中正确的是( )。(B)
A. Index的值可正可负
B. Index的值用来区分哪个单选按钮被选中
C. Index表示数组中单选按钮的数量
D. Index为1表示单选按钮被选中，为0表示未选中
解析：控件数组是一组具有共同名称和类型的控件，它们拥有共同的事件，数组中的每个控件都有惟一的索引号(Index)，即下标，默认索引号从0开始，不能为负值。
4.以下关于菜单的叙述中，错误的是( )。(B)
A. 当窗体为活动窗体时，用Ctrl+E键可以打开菜单编辑器
B. 把菜单项的Enabled属性设置为False，则可删除该菜单项
C. 弹出式菜单在菜单编辑器中设计
D. 程序运行时，利用控件数组可以实现菜单项的增加或减少
解析：当菜单项的Enabed属性值设置为False时，菜单项只是变为无效项，不可用，不会删除该菜单项。故B选项错误。
5.假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是( )。(C)
A. Print 25
B. Picture1.Print 25
C. Text.Print 25
D. Debug.Print 25
解析：Print方法可以在窗体上显示文本字符串和表达式值，并可在其他图形对象或打印机上输出信息。也可以在立即窗口输出信息。但不能在文本框控件上输出信息，因此选项C不正确。
6.某人编写如下函数来判断a是否为素数，若是，则函数返回True；否则返回False。
Function prime(a As Integer)As Boolean
Dim k As Integer,isprime As Boolean
Ifa＜2 Then
isprime=False
Else
isprime=True
k=2
Do While k＜a／2 And isprime
If aModk=0Then
isprime=False
Else
k=k+1
EndIf
Loop
EndIf
prime=isprime
End Function
在测试时发现有1个非素数也被判断为素数，这个错判的数是( )。(C)
A. 0
B. 1
C. 4
D. 6
解析：考查循环的运行。如果输入的数据小于2，那么肯定不是素数，更改isprime的值为False。如果数据大于等于2，当等于2时，isprime为True，同时k＜a／2不成立，a为2时为素数，当a为4时，k＜2不成立，则误判断4也是素数，因此不符合素数的定义。
7.关于菜单设计，下列叙述中错误的是( )。(D)
A. 弹出式菜单也在菜单编辑器中定义
B. 在菜单的标题栏中，“&”所引导的字母指明了访问该菜单项的访问键
C. 程序运行过程中，可以重新设置菜单的Visible属性
D. 在同一窗体的菜单项中，不允许出现标题相同的菜单项
解析：本题考查菜单设计。VB中所有的菜单都是在菜单编辑器中定义的。定义菜单时“&”后面的字母为访问该菜单项的访问键，每个菜单项都要有惟一的名字，在程序运行中可以根据名字来更改菜单的Enabled、Visible等属性。不同名称的菜单的标题可以相同。
8.窗体上命令按钮Command1的事件过程如下：
Option Base1
Private Sub Command1_Click()
Dim a(4，4)As Variant
For i=l To 4
For j=1 To 4
a(i，j)=(i-1)*3+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print a(i，j)
Next i
Next i
End Sub
该程序执行后，输出结果是( )。(A)
A. 9
10
12
13
B. 7
10
12
13
C. 9
12
10
13
D. 8
11
9
12
解析：本题考查二维数组元素的赋值。二维数组中a中第i行j列元素为(i-1)*3+j，i、j分别从3变化到4，因此，输出(3，3)、a(3，4)、a(4，3)、a(4，4)的元素为：9 10 12 13。
9.在E-R图中，用来表示实体联系的图形是( )。(C)
A. 椭圆形
B. 矩形
C. 菱形
D. 三角形
解析：在E—R图中实体集用矩形，属性用椭圆，联系用菱形。
10.在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图所示)，则空白处应填入的内容是( )。
