在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

问题单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： 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 Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub Pdvate Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=True End Sub Private 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．无任何输出

答案

参考答案：C

解析：本题考查的是鼠标事件，当按下鼠标左键(发生MouseDown时)，SW的值为False，当松开鼠标左键(触发MouseUp时)，SW的值为True。