VB选择题不会的.doc

31804. 阅读下列程序：
Sub Med(x%, ByVal y%)
x = 3 * x: y = x + y
End Sub
Private Sub Form_Click()
Dim a%, b%
a = 3: b = 8
Med a, b
Print a, b
End Sub
运行后，单击窗体，输出结果为（ ）。
(A) 3 8
(B) 3 17
(C) 9 8
(D) 9 17
(答案：C)
32009. 用（ ），可以进行写操作。
(A) Open '' For Input As #1
(B) Open '' For Output As #1
(C) Open '' For Random As #1
(D) Open '' For Binary As #1
(答案：B)
32006. 下列叙述正确的是（ ）。
(A) 一个记录中所包含的各个元素的数据类型必须相同?
(B) 随机文件中每个记录的长度必须相同?
AB均错
31807. 阅读如下程序，
Dim S As Single, a As Single, b As Single
a = 1: b = 2
plus S, a, b
Print S
不能使其输出结果为3的plus过程为（ ）。
(A) Sub plus(sum As Single, a As Single, b As Single)
sum = a + b
End Sub
(B) Sub plus(ByVal sum As Single, a As Single, b As Single)
sum = a + b
End Sub
(C) Sub plus(ByRef sum As Single, ByVal a As Single, ByVal b As Single)
sum = a + b
End Sub
(D) Sub plus(sum As Single, ByRef a As Single, ByRef b As Single)
sum = a + b
End Sub
(答案：B)
31604. 执行下列程序段后输出的结果是（ ）。
s = 1
For i = 1 To 3
For j = 0 To i-1
s = s + s * j
Next j
print s;
Next I
(A) 1 2
(B) 2 1
(C) 2 2 12
(D) 1 2 12
(答案：D)
（S=1+0=1
S=1+0=1:s=1+1*1=2
S=2+2*0=2:s=2+2*1=4
S=4+4*0=4:s=4+4*1=8:s=8+8*B=24?????????????????)
31409. 要使用自定义的鼠标指针，必须将MousePointer属性设置为（ ）。
(A) 0
(B) 15
(C) 3
(D) 99
(答案：D)
31406. 下列叙述错误的是（ ）。
(A) 在KeyDown事件中，键盘上输入的A或a被视作相同的字母
(B) 在KeyUp事