欢迎您访问高中作文网,请分享给你的朋友!

当前位置 : 首页 > 问答 > 教育知识

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

来源:整理 时间:2022-12-12 手机浏览

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

问题:

[单选]在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
DimSWAsBoolean
Functionfunc(XAsInteger)AsInteger
IfX<20Then
Y=X
Else
Y=20+X
EndIf
func=Y
EndFunction
PrivateSubForm_MouseDown(ButtonAsInteger,_
ShiftAsInteger,XAsSingle,YAsSingle)
SW=False
EndSub
PrivateSubForm_MouseUp(ButtonAsInteger,_
ShiftAsInteger,XAsSingle,YAsSingle)
SW=True
EndSub
PrivateSubCommand1_Click()
DimintNumAsInteger
intNum=InputBox(””)
IfSWThen
Printfunc(intNum)
EndIf
EndSub
程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为()。

A.输出0
B.输出25
C.输出45
D.无任何输出

参考答案:D

参考解析:

调用func(inNum)的返回值为45。当鼠标在单击命令按钮前,SW默认值为False,当单击窗体,也就是按顺序调用Form_MouseDown()和Form_MouseUp后SW的值才为True。所以在只是单击按钮,输入25的情况下,SW的值为False,并不打印结果,故程序无任何输出。