![[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim SW As BooleanFunction func(X As Integer) As IntegerIf X](http://www.mshxw.com/aiimages/31/480291.png "[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim SW As BooleanFunction func(X As Integer) As IntegerIf X")
[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim SW As BooleanFunction func(X As Integer) As IntegerIf X < 20 Then Y = X Else Y = 20 + X End If func = Y End FunctionPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y AsSingle)SW = FalseEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW = True End SubPrivate Sub Command1_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)语句没有被执行，当然也就无任何输出了。
