国家二级（VB）机试模拟试卷408
选择题
1.若在窗体模块的声明部分声明了如下自定义类型和数组：
Private Type rec
Code As Integer
Caption As String
End Type
Dim arr(5)As rec
则下面的输出语句中正确的是( )。(C)
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(2)， Caption(2)
解析：定义一个自定义类型的数组，数组元素表示为：数组名(下标).成员名，故选C。
2.某人设计了一个窗体用于登录注册信息，上面有若干控件，其中接收注册时间输入的文本框名称为Text1。他希望，当要输入注册时间时能自动填写当前时间，于是编写了一行代码：
Text1．Text=Date
请问，这行代码应该放入( )事件的事件过程中才能达到目的。(A)
A. GotFocus
B. LostFocus
C. Change
D. Click
解析：文本框的GotFoucs表示当文本框获得焦点时，此事件被触发。为实现在文本框中自动显示系统当前日期，可以将代码“Text1．Text=Date放入文本框的GotFoucs事件中，当用户移动鼠标指针到文本框Text1，获得焦点时，会自动触发自动填充当前时间事件，故A选项正确。LostFocus表示当文本框失去焦点时，触发该事件。Change表示当文本框的内容发生变化时所触发的事件。Click表示当点击文本框所触发的事件。故B、c、D选项均错误，答案为A选项。
3.下列程序的执行结果是( )。
Private Sub Form_Activate()
Dim score(3)As Integer，total As Integer
Dim aa score As Variant
score(1)=50：score(2)=14：score(3)=36
total=0：i=0
For Each aa score In score
i=i+1
total=total+aascore
Print i，aa score，tota1
Next
End Sub(A)
A. 1 0 0
2 50 50
3 14 64
4 36 100
B. 1 50 50
2 14 64
3 36 100
C. 0 50 50
1 14 64
2 36 100
3 36 100
D. 0 0 0
1 50 50
2 14 64
3 36 100
解析：本题考查For Each In语句。该语句的使用形式为：For Each成员In数组…Next，适用于不关心数组中的元素个数或者不清楚有多少个元素，使用时要求成员为变体类型变量。当激活窗体时，对score数组中的每个元素进行求和，同时i记下当前计算数组元素的个数。默认数组下标从0开始，题中score数组中含有4个元素，输出4行。
4.下面程序运行时，若输入395，则输出结果是( )。
Private Sub CmdI_Click()
Dima％
a=InputBox(“请输入一个3位整数”)
Print a Mod 10，a＼100，(a Mod 100)＼10
End Sub(C)
A. 5 9 3
B. 3 5 9
C. 5 3 9
D. 3 9 5
解析：Ⅶ中常用算术运算符有8个，其中幂运算符(^)优先级最商；其次是取负(-)、乘(*)、浮点除(／)、整除(＼)、取模(Mod)、加(+)、减(一)a
5.数据库应用系统中的核心问题是( )。(A)
A. 数据库设计
B. 数据库系统设计
C. 数据库维护
D. 数据库管理员培训
解析：数据库应用系统中的核心问题是数据库的设计。
6.下列二叉树描述中，正确的是( )。(B)
A. 任何一棵二叉树必须有一个度为2的结点
B. 二叉树的度可以小于2
C. 非空二叉树有0个或1个根结点
D. 至少有2个根结点
解析：二叉树是由n≥0个结点的有限集合构成，此集合或者为空集，或者由一个根结点及两棵互不相交的左右子树组成，并且左右子树都是二叉树。二叉树可以是空集合，根可以有空的左子树或空的右子树。二叉树不是树的特殊情况，它们是两个概念。
二叉树具有如下两个特点：①非空二叉树只有一个根结点。②每一个结点最多有两棵子树，且分别称为该结点的左子树与右子树。
7.下面不能在信息框中输出“VB”的是( )。(D)
A. MsgBox\\
B. x=MsgBox(\\
C. MsgBox(\\
D. Call MsgBox\\
解析：Msgbox的功能：显示消息提示框，存埘话框中显示提示消息，等待用户单击按钮，单击不同的按钮返回不同的整数。
MsgBox函数格式：变量=MsgBox([，样式][，标题])，注意MsgBox函数带括号，有返回值；
MsgBox语句格式：MsgBox([，样式][，标题])，有无括号都可以，无返回值。
选项D中用Call语句调用MsgBox函数，要符合Call语句的语法规则：Call函数名(实参表)，缺少括号，应该为Call MsgBox(\\
8.下面是求最大公约数的函数的首部( )。
Function fun(By Val x As Integer，ByVal y As
Integer)As Integer
若要输出8、12、16这3个数的最大公约数，
下面正确的语句是(D)
A. Print fun(8，12)，fun(12，16)，fun(16，8)
B. Print fun(8，12，16)
C. print fun(8，12)，fun(12，16)，fun(16)
D. Print fun(8，fun(12，16))
解析：函数过程在传递参数时，形参表与实参表中对应变量的名字不必相同，但参数的个数、对应位置和对应类型必须相同。本题中的fun函数有两个参数，任何对于fun的调用都必须传递实参为两个整型值；选项A中得到3个结果，显然不是我们所需要的；选项D中的函数嵌套调用能够求出3个数的最大公约数。
9.以下描述中，不是线性表顺序存储结构特征的是 ( )。(D)
A. 可随机访问
B. 需要连续的存储空间
C. 不便于插入和删除
D. 逻辑相邻的数据物理位置上不相邻
解析：线性表的顺序存储是用一片连续的空间来存放数据元素，其特点是逻辑上相邻的元素在物理位置上也相邻。数据元素之间逻辑上的先后关系自动隐含在物理位置的相邻元素之中，因此不需要另外开辟空间来保存元素之间的关系。
10.下列各种窗体事件中，不能由用户触发的事件是(
本文档预览：3600字符，共18999字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
