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是密码
i=msgbox(\"密码错误\",5+vbexclamation,\"输入密码\")
if i=2  then
end '终止程序
else
textbox2.text=\"\"
end if
else
msgbox(\"通过验证！\")
end if
end sub

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

i=msgbox(\"密码错误\",5+vbexclamation,\"输入密码\")
if i=2  then

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

MsgBox是个返回intger类型的方法
自己跟踪调试就知道i的值了

msgbox("密码错误",5+vbexclamation,"输入密码")
等于
MsgBox("密码错误", MsgBoxStyle.RetryCancel + MsgBoxStyle.Exclamation, "输入密码")
MsgBoxStyle.RetryCancel返回值是5，是取消消息框，MsgBoxStyle.Exclamation返回值是48，是重试消息框
这样是把这两个消息框组合在一起

msgbox返回enum

而enum的本質是個integer