问题:
[单选] 在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:Di mSW As Boolean
Function func(X As Integer)As Integer
If X<20Then
Y =X
Else
Y =20+X
End If
func =Y
End Function
Private Sub Form_MouseDown(Button As Integer ,_
Shift As Integer ,X As Si ngle ,Y As Si ngle)
SW=False
End Sub
Private Sub Form_Mouse Up(Button As Integer ,_
Shift As Integer ,X As Si ngle ,Y As Si ngle)
SW=True
End Sub
Private Sub Co mmand1_Click()
Di mi nt Num As Integer
i nt Num=InputBox("")
If SW Then
Print func(i nt Num)
End If
End Sub
程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为( )。
A . 输出0
B . 输出25
C . 输出45
D . 无任何输出
参考答案:D
参考解析:
调用func(i nNum)的返回值为45。当鼠标在单击命令按钮前,SW 默认值为False ,当单击窗体,也就是按顺序调用Form_MouseDown()和Form_Mouse Up 后SW 的值才为True。所以在只是单击按钮,输入25的情况下,SW 的值为False ,并不打印结果,故程序无任何输出。