(19)为了暂时关闭计时器，应把计时器的某个属性设置为False，这个属性是________。
A)Visble　　B)Timer　　C)Enabled　　D)Interval
答案：C
评析：控件的Enabled属性表示其是否有效，如果想使某个拉件失效，可以将它的Enabled属性设为False。

(20)对窗体编写如下事件过程：
Private Sub Form MouseDown(Button As Integer，Shift As Integer,X As Single，
Y As Single、
If Button=2 Then
Print"AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print"BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为_________。
A)AAAAA　B)BBBBB　　C)AAAAA　　D)BBBBB
BBBBB　　　　　　　　　　　　　AAAAA
答案：A
评析：窗体的的MouseDown和MouseUp中，button参数是具有相应于左按钮(位0)，右按钮(位1)，以及中间按钮(位2)的一个位字段。这些位的值分别等于1，2，和4。其中仅有一位被设置，指示出引起该事件的那个按钮。本题中MouseDown事件会首先判断按下的是哪个鼠标键，如果是右键则输出AAAAA。然后在MouseUp事件中输出BBBBB。

(21)假定有以下循环结构：
Do until条件
循环体
Loop
则下列说法正确的是_________。
A)如果"条件"是一个为-1的常数，则一次循环体也不执行
B)如果"条件"是一个为-1的常数，则至少执行一次循环体
C)如果"条件"是一个不为-1的常数，则至少执行一次循环体
D)不论"条件"是否为"真"，至少要执行一次循环体
答案：A
评析：Do Until循环采用的是先判断条件后执行循环体的做法。如果条件为True，则退出循环循环，如果为False，则执行能循环体。所以如果"条件"是一个为．1(为True)的常数，则循环体就会一次也不执行。

(22)在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_Click()
Dim Arr1(10)As Integer，arr2(10)As Integer
n=3
For i=l TO 5
Arrl(i)=i
arr2fnl=2 * n+I
Next i
Print arr2(n)；Arr1(n)
End Sub
程序运行后，单击命令按钮，输出结果是_________。
A)11　3　　B)3　11　　　C)13　3　　D)3　13
答案：A
评析：本题的程序每次循环都将arr2(3)重新赋一次值。最终的arr2(3)的值为2*3+5=11。而arrl(3)的值始终为3。所以最终的输出是11和3。