回 帖 发 新 帖 刷新版面

主题:msgbox可以返回一个数值吗

[code]private sub button1_click(中间一大串)handles button1.click

dim i as integer
if not isnumeric(textbox1.text) then
msgbox("学号有非数字字符错误,请重新输入!")
textbox1.text=""
textbox2.text=""
elseif  textbox2.text<>"776655"  then '776655是密码
[size=5]i=msgbox("密码错误",5+vbexclamation,"输入密码")
if i=2  then[/size]
end '终止程序
else
textbox2.text=""
end if
else
msgbox("通过验证!")
end if
end sub

这是一个登录验证程序,不太明白其中的


i=msgbox("密码错误",5+vbexclamation,"输入密码")
if i=2  then
[/code]

这两句的意思,msgbox可以返回一个数值吗?i=2又是什么意思?请高手指点,谢谢!

回复列表 (共4个回复)

沙发

MsgBox可以有多个返回值,分别是OK(1),Cancle(2),Abort(3),Retry(4),Ignore(5),
Yes(6),No(7).
你说的这两句的意思是:当你输错密码时,会弹出这个消息框,如果这时你选择取消按钮的话,系统就会结束程序。

板凳


在NET上还在使用text控件真是过时,像这类需要对输入数据进行验证的文本框最后使用maskedtextbox控件。

3 楼

[quote]MsgBox可以有多个返回值,分别是OK(1),Cancle(2),Abort(3),Retry(4),Ignore(5),
Yes(6),No(7).
你说的这两句的意思是:当你输错密码时,会弹出这个消息框,如果这时你选择取消按钮的话,系统就会结束程序。[/quote]
顶~~~~~~~~~~~~~~~~~~~~~~~~

4 楼

[quote]MsgBox可以有多个返回值,分别是OK(1),Cancle(2),Abort(3),Retry(4),Ignore(5),
Yes(6),No(7).
你说的这两句的意思是:当你输错密码时,会弹出这个消息框,如果这时你选择取消按钮的话,系统就会结束程序。[/quote]


不错,顶!!!!!!!!!!!!!!!!!!!!

我来回复

您尚未登录,请登录后再回复。点此登录或注册