【机房收费系统】——被忽视的MsgBox

       原本被以为这个msgbox很简单，只是套用就可以，从来没有深究，但其实里面大有学问。msgbox一共有四种图标：警告、通知、错误、询问。但是我们一般用的图标都是警告。这是很不对的！所以我们很有必要好好的去补一下这方面之前没有注意到的的知识，比如说登陆成功、删除成功、等提示就绝不能用警告的标识

msgbox

 

MsgBox是 Visual Basic和 VBS中的一个函数，功能是弹出一个 对话框，等待用户单击按钮，并返回一个 Integer值表示用户单击了哪一个按钮。

使用方法

语法

MsgBox ( Prompt [, Buttons] [, Title] [, Helpfile, Context])

参数

MsgBox函数参数 部分 描述 Prompt 必选。字符串 表达式，显示在对话框中的消息。Prompt的最大长度大约为 1024个字符，由所用字符的字节大小决定。如果Prompt的内容超过一行，则可以在每一行之间用回车符（Chr(13)）、换行符（Chr(10)）或是回车与换行符的组合（Chr(13) & Chr(10)，即 vbCrLf）将各行分隔开来。 Buttons 可选。数值表达式，是一些数值的总和，指定所显示的按钮的数目及形式、使用的图标样式（及声音），缺省按钮以及消息框的强制性等。如果省略，则其缺省值为0。具体数值见“参数设置值”表格。 Title 可选。字符串表达式，在对话框标题栏中显示的内容。如果省略Title，则将应用程序标题（App.Title）放在标题栏中。 Helpfile 可选。字符串表达式，用来向对话框提供上下文相关帮助的帮助文件。如果提供了Helpfile，则也必须提供Context。 Context 可选。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context，则也必须提供Helpfile。

参数设置值

Buttons参数设置值 常数 值 描述 对话框中显示的按钮的类型与数目 vbOKOnly 0 只显示“确定”按钮。（缺省） vbOKCancel 1 显示“确定”和“取消”按钮。 vbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略”按钮。 vbYesNoCancel 3 显示“是”、“否”和“取消”按钮。 vbYesNo 4 显示“是”和“否”按钮。 vbRetryCancel 5 显示“重试”和“取消”按钮。 图标的样式（根据系统设置，可能伴有声音） vbCritical 16 显示“错误信息”图标。 vbQuestion 32 显示“询问信息”图标。 vbExclamation 48 显示“警告消息”图标。 vbInformation 64 显示“通知消息”图标。 默认按钮 vbDefaultButton1 0 第一个按钮是默认按钮。（缺省） vbDefaultButton2 256 第二个按钮是默认按钮。 vbDefaultButton3 512 第三个按钮是默认按钮。 vbDefaultButton4 768 第四个按钮是默认按钮。 对话框的强制返回性 vbApplicationModal 0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。 vbSystemModal 4096 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。 对话框特殊设置 vbMsgBoxHelpButton 16384 将帮助按钮添加到消息框。 vbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口。 vbMsgBoxRight 524288 文本为右对齐。 vbMsgBoxRtlReading 1048576 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示。

返回值

MsgBox函数返回值 常数 值 描述 vbOK 1 单击了“确定”按钮。 vbCancel 2 单击了“取消”按钮。 vbAbort 3 单击了“终止”按钮。 vbRetry 4 单击了“重试”按钮。 vbIgnore 5 单击了“忽略”按钮。 vbYes 6 单击了“是”按钮。 vbNo 7 单击了“否”按钮。