Question

急 VB考试题~ 做好了加分 多多！

一、单选题
1．设a = 5，b = 4，c = 3，d = 2，表达式3 > 2 * b Or a = c And b<>c Or c>d的值是
（A） 1 （B） True （C） False （D） 2
2．设a = "MicrosoftVisualBasic"，则以下使变量b的值为 VisualBasic的语句是
（A）b = Left(a,10) （B）b = Mid(a,10) （C）b = Right(a,10) （D）b = Mid(a,11,10)
3．假定有如下的窗体事件过程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c$ = Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是：
（A）Microsoft Visual （B）Microsoft （C）Basic （D）5
4．设a = "a"，b = "b"，c = "c"，d = "d"，执行语句x = IIf ((a<b) Or (c>d), "A", "B") 后，x的值为：
（A） "a" （B） "b" （C） "B" （D） "A"
5．为了使命令按钮(名称为Command1)右移200，应使用的语句是
（A）Command1.Move -200 （B） Command1.Move 200
（C）Command1.Left= Command1.Left+200（D）Command1.Left = Command1.Left-200
6．在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容是：
（A）123 （B）456 （C）579 （D）123456
7．在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False,程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：
Private Sub Command1_Click()
Timer1._________
End Sub
Private Sub Timer1_Timer()
Text1.Text = Time
End Sub
在______处应填入的内容是
（A）Enabled = True （B）Enabled = False
（C）Visible = True （D）Visible = False
8．在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, x As Integer
For i = 1 To 6
If i = 1 Then x = i
If i <= 4 Then
x = x + 1
Else
x = x + 2
End If
Next i
Print x
End Sub
程序运行后，单击命令按钮，其输出结果为
（A）9 （B）6 （C）12 （D）15
二、判断题（10分）
9．在一个数组中所有的数组元素都具有相同的数据类型。
10．赋值语句：Text1.text = "张三" 和Text1 = "张三" 的功能是不相同的。
11．形式参数的数据类型可以为数值型、字符串型（包括变长和定长）等。
12．取模运算符的优先级别高于整除运算符。
13．记录（自定义数据类型）由多个数据项组成，所有数据项必须是同一种数据类型。
14．语句Print Format$(32548.5,"000,000.00")输出结果是032,548.50。

Answer 1

1.B
2.B
3.C
4.D
5.C
6.C
7.A
8.A
9.对
10.错
11.错
12.错
13.错
14.对