在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:Di m

在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:Di mSW As BooleanFunction func(X As Integer)As Integer If X<20Then Y =XElse Y =20+X End Iffunc =YEnd FunctionPrivate Sub Form_MouseDown(Button As Integer ,_ Shift As

问题:

[单选] 在窗体上画一个名称为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 ,并不打印结果,故程序无任何输出。

联系我们

联系我们

查看联系方式

邮箱: 2643773075@qq.com

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

返回顶部