（11）假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是
A．只保存窗体模块文件
B．分别保存窗体模块、标准模块和工程文件
C．只保存窗体模块和标准模块文件
D．只保存工程文件
（12）为了清除窗体上的一个控件，下列正确的操作是
A．按回车键
B．按Esc键
C．选择（单击）要清除的控件，然后按Del键
D．选择（单击）要清除的控件，然后按回车键
（13）以下叙述中错误的是
A．打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B．当程序运行时，双击一个窗体，则触发该窗体的DblClick事件
C．Visual Basic应用程序只能以解释方式执行
D．事件可以由用户引发，也可以由系统引发
（14）设a=2, b=3, c=4, d=5, 下列表达式的值是
Not a<=c Or 4*c=b^2 And b<>a+c
A．-1
B．1
C．True
D．False
（15）设a = 5，b = 10，则执行
c = Int((b - a) * Rnd + a) + 1
后，c值的范围为
A．5～10
B．6～9
C．6～10
D．5～9
（16）在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
a$ = "software and hardware"
b$ = Right(a$, 8)
c$ = Mid(a$, 1, 8)
MsgBox a$, , b$, c$, 1
End Sub
运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是
A．software and hardware
B．software
C．hardware
D．1
（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox("Enter an integer")
b = InputBox("Enter an integer")
Text1.Text = b + a
End Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是
A．108
B．18
C．810
D．出错
（18）在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：
Private Sub Form_Load()
Show
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End Sub
Private Sub Text1_Change()
Text2.Text = Mid(Text1.Text, 8)
End Sub
程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
A．BeijingChina
B．China
C．Beijing
D．BeijingC
（19）在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
Private Sub Form_Load()
List1.AddItem "Item 1"
List1.AddItem "Item 2"
List1.AddItem "Item 3"
End Sub
Private Sub Command1_Click()
List1.List(List1.ListCount) = "AAAA"
End Sub
程序运行后，单击命令按钮，其结果为
A．把字符串“AAAA”添加到列表框中，但位置不能确定
B．把字符串“AAAA”添加到列表框的最后（即“Item 3”的后面）
C．把列表框中原有的最后一项改为“AAAA”
D．把字符串“AAAA”插入到列表框的最前面（即“Item 1”的前面）
（20）假定有如下事件过程：
Private Sub Form_Click()
Dim x As Integer, n As Integer
x = 1
n = 0
Do While x < 28
x = x * 3
n = n + 1
Loop
Print x, n
End Sub
程序运行后，单击窗体，输出结果是
A．81 4
B．56 3
C．28 1
D．243 5
【责编:onmars 纠错】
[1] [2] [3] [4] [5] [6] [7] 
相关文章
2005-9-17
