主题: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又是什么意思?请高手指点,谢谢!
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又是什么意思?请高手指点,谢谢!