选择题 8.  在窗体上画一个名称为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
    Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
    SW=False
    End Sub
    Private 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=InputB0x("")
    IfSW Then
    Print func(intNum)
    End If
    程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为
______。
【正确答案】 D
【答案解析】 本题考查的是鼠标事件,当压下鼠标左键(发生MouseDown时),SW的值为False,当松开鼠标左键(触发MouseUp时),SW的值为True。