国家二级（VB）机试模拟试卷191
选择题
1.数据库的故障恢复一般是由( )来执行恢复。(C)
A. 电脑用户
B. 数据库恢复机制
C. 数据库管理员
D. 系统普通用户
解析：数据库一旦发生故障，需要及时进行故障恢复，并由数据库管理员负责执行故障恢复。
2.以下叙述中错误的是( )。(D)
A. 标准模块文件的扩展名是.bas
B. 标准模块文件是纯代码文件
C. 在标准模块中声明的全局变量可以在整个工程中使用
D. 在标准模块中不能定义过程
解析：标准模块独立保存为标准模块文件.bas，故A选项正确。
标准模块是应用程序内其他模块访问的过程和声明的容器。当应用程序比较庞大，含有多个窗口，而且几个窗口需要写重复的过程、变量等代码时，就可以把这些重复的代码写在标准模块。故B选项正确。
在标准模块中定义的Public变量、Public过程属于全局变量和全局过程，在整个工程中的其他窗体、模块都可以使用。故C选项正确，
在标准模块中可以定义过程，故D选项错误。
3.在设计窗体时双击窗体的任何地方，可以打开的窗口是( )。(A)
A. 代码窗口
B. 属性窗口
C. 工程资源管理器窗口
D. 工具箱窗口
解析：设计窗体时双击窗体的任何地方，默认打开的是代码窗口。故选A。
4.下面哪个属性不是框架控件的属性( )。(C)
A. Caption
B. Left
C. Text
D. Enabled
解析：框架控件的Caption属性用来显示说明性的文字，Left属性来指定框架左侧坐标，Enabled属性用来指定框架是否可用。而Text属性用于返回或设置文本框中的内容，具有该属性的控件有文本框、列表框、组合框等，不包括框架控件。
5.命令按钮Command1的单击事件过程如下：
Private Sub Command1_Click()
Dim a(10，10)As Integer
x=0
For i=1 To 3
For j=1 To 3
a(i，j)=i*2 Mod j
If x<a(i，j)Then x=a(i，j)
Next
Next
Print x
End Sub
执行上述事件过程后，窗体上显示的是( )。(B)
A. 1
B. 2
C. 3
D. 4
解析：题目中定义了一个二维数组，为数组赋初值并找出这些值中最大的值输出。数组中的值为：
a(1，1)=1*2 mod 1=0a(1，2)=1*2 mod 2=0a(1，3)=1*2 mod 3=2
a(2，1)=2*2 mod 1=0a(2，2)=2*2 mod 2=0a(2，3)=2*2 mod 3=1
a(3，1)=3*2 mod 1=0a(3，2)=3*2 mod 2=0a(3，3)=3*2 mod 3=0
显然最大值为2，因此Print x语句将在窗体上显示2。
6.下面不能在信息框中输出“Visual Basic”的是( )。(C)
A. x=MsgBox(\\
B. MsgBox(\\
C. MsgBox\\
D. Call MsgBox\\
解析：MsgBox()函数用于显示提示信息，并可返回一个代表用户单击了哪个按钮的Integer类型值，当其作为函数使用时必须将参数放在括号内部，而返回值可以赋值给一个变量，也可以单独使用此函数而不将其返回值赋值给变量；MsgBox过程也用于显示提示信息，作为过程必须使用Call关键字来进行调用，其参数不能加括号。
7.在窗体上有一个文本框Textl，Text属性值为空，然后编写如下事件过程：
Private Sub Text l KeyPress(KeyAscii As Integer)
Dim str As String，n As Integer
str=UCase(Chr(KeyAscii))
n=Len(strl
Text1．Text=String(n，str)
End Sub
程序运行后，如果在文本框巾输入字母“P”，则在文本框巾显示的内容为( )。(B)
A. PP
B. pP
C. PP
D. Pp
解析：本题考查字符串函数的应用。在Textl中按下字母“p”，则首先显示字符“p”，接下来触发KeyPress事件，其中，UCase把字符“p”转化为大写字母，显示大写字母“P”。
8.有如下程序：
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
End Sub
程序运行后，单击窗体，则输出结果是( )。(D)
A. 90
B. 180
C. 400
D. 800
解析：
9.在窗体上有2个图片框，名称分别为Picture1和Picture2，Picture2中添加了香蕉图片(见图3)，且将Picture2．DragMode属性设置为1。要求程序运行时，可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现此功能的事件过程是( )。
(C)
A. Private Sub Form_DragDrop(Source As Control，X As Single，Y As Single)
Picture2．Move Picture1．Left+X，Picture1．Top+Y
End Sub
B. Private Sub Picture2_DragDrop(Source As Control，X As Single，Y As Single)
Source．Move Picture1．Left+X，Picture1．Top+Y
End Sub
C. Private Sub Picture1_DragDrop(Source As Control，X As Single，Y As Single)
Source．Move Picture1．Left+X，Picture1．Top+Y
End Sub
D. Private Sub Picturel_DragDrop(Source As Control，X As Single，Y As Single)
Picture2．Move Picture2．Left+X，Picture2．Top+
本文档预览：3600字符，共19369字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
