Msgbox
在程序应用中经常会提示用户进行操作，比如某项数据填写不规范，某个必填项为空等等。这时候用Msgbox弹出对话框，来提示或者引导用户继续操作。
用法：MsgBox (Prompt [,Buttons] [,Title] [,Helpfile,Context])
我们先说 Prompt 参数：
这个参数字符串，如果需要换行怎么办？我们可以在需要换行的时候用vbNewLine或者vbCrLf或者Chr(13)连接字符串即可，需要注意的是每个字符串必须加上英文双引号。
效果：
如果提示信息里要带变量，比如变量a是距离高考的天数，就需要用 “&” 连接符来连接：
Msgbox “距离高考还有” & a & “天”
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 | 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示。 |
这里就不一一介绍每个参数的使用方法了，我会把这些参数都集中在一个示例中，大家可以在http://51vb.ys168.com/下载
这里单独介绍一下强制返回性：
默认弹出对话框的时候，如果不点击对话框的按钮，本程序会被挂起，不能有其他操作，但是系统的其他程序依然可以进行操作，
如果这个参数换成vbSystemModal，系统的其他程序都被挂起，你只能操作这个对话框才能进行下一步。
（更正：以前我在学校用Windows2000的时候我记得是这样，但是刚刚我在Windows7上做实验，有很大差别，vbSystemModal仅仅是在所有窗体之上，并不挂起其他程序）
这个很容易理解，通过返回值，我们可以做响应的处理，比如：
还有一个就是Title参数，这是个字符串型，用来设置弹出对话框的标题：
最后我把所有的关于Msgbox用法都用一个示例来演示：