[单项选择题] 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim SW As BooleanFunction func(X As Integer) As IntegerIf X

16 查阅

[单项选择题] 在窗体上画一个名称为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．无任何输出

参考答案:

当鼠标指针在屏幕的某个对象上按键时，就会激发这个对象的 MouseDown 事件与 MouseUp 事件。本题中单击的是命令按钮，而不是窗体，故窗体的 MouseDown 事件与 MouseUp 事件没有被激发，所以 SW为 False，因为如果定义了一个 Boolean 型变量，如果不对它赋值，默认就是 False。所以 Print func(intNum)语句没有被执行，当然也就无任何输出了。

计算机考试