问题
单项选择题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
Dim SW As Boolean
Function func(X As Integer)As Integer
If X＜20 Then
Y=X
Else
Y=20+X
End If
func=Y
End FunctiOn
Phvate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False
End Sub
Phvate Sub Form_MouseUp(BuRon As Integer,Shin As Integer，X As Single,Y As Single)
SW=Tree
End Sub
Pdvate Sub Commandl-Click()
Dim intNum As Integer
intNum=InputBox("")
If SW Then
Print func(intNum)
End If End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则程序的执行结果为（）。
A．输出0
B．输出25
C．输出45
D．无任何输出
答案
参考答案：D
解析：
[评析] 当鼠标指针在屏幕的某个对象上按键时，就会激发这个对象的MouseDown事件与MouseUp事件。本题中单击的是命令按钮，而不是窗体，故窗体的MouseDown事件与MouseUp事件没有被激发，所以SW为 False，因为如果定义了一个Boolean型变量，如果不对它赋值，默认就是False。所以Print func(intNum)语句没有被执行，当然也就无任何输出了。