312 Msg Box函数和 MsgBox过程 x= Input Box("请输入密码字符") IfLen(x)<6Then!当x中的值少于6个字符时,则执行下面语句 y= Msg Box("错误:您输入的字符串不足6位", VbOkonly"密 码消息") End If 执行上述语句时若在输入框中输入少于6个字符的内容,则会 出现下面图所示的消息框;而输入6个以上字符则不出现下 面的消息框。 密码消息 错误:您输入的字符串不足6位 确定 MsgBox例 注意消息框中出现的提示内容、标题栏内容、按钮的形式。3.1.2 MsgBox函数和MsgBox过程 x＝InputBox("请输入密码字符") If Len(x)<6 Then '当x中的值少于6个字符时，则执行下面语句 y=MsgBox("错误：您输入的字符串不足6位",VbOkOnly,"密 码消息") End If 执行上述语句时若在输入框中输入少于6个字符的内容，则会 出现下面图所示的消息框；而输入6个以上字符则不出现下 面的消息框。 MsgBox例 注意消息框中出现的提示内容、标题栏内容、按钮的形式。 例