MsgBox 语句后面接 “exit sub”的作用
Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "请输入用户名!", vbOKOnly + vbCritical, "错误"
Exit Sub
If Text2.Text = "" Then
MsgBox "请输入密码!", vbOKOnly + vbCritical, "错误"
End If
End If
End Sub
上述程序,当text1为空时,弹出“请输入用户名”后直接退出了最外层IF语句,不弹出“请输入密码”
“exit sub”注释掉,清空text1和text2,发现弹出“请输入用户名后”继续弹出“请输入密码”。
posted on 2013-02-23 12:52 イケメンおっさん_汪汪 阅读(333) 评论(0) 编辑 收藏 举报