MessageBox

MessageBox是一个预定义对话框，用于向用户显示信息，并根据用户单击按钮的动作返回不同的值。

MessageBox有一个共享方法Show，用于显示对话框，语法是：

MessageBox.Show(Message, Caption, Buttons, Icon)

参数 说明
Message 要显示的信息
Caption 对话框标题
Buttons 可选参数，指定要显示的按钮，MessageBoxButtons型枚举，包括以下可选值：
　
AbortRetryIgnore： 包含“中止”、“重试”和“忽略”按钮。
OK： 包含“确定”按钮
OKCancel： 包含“确定”和“取消”按钮
RetryCancel： 包含“重试”和“取消”按钮
YesNo： 包含“是”和“否”按钮
YesNoCancel： 包含“是”、“否”和“取消”按钮

如果省略，则显示“确定”按钮。
Icon 可选参数，指定要显示的图标，MessageBoxIcon型枚举，包括以下可选值：
　
Error： 显示错误图标，由一个红色背景的圆圈及其中的白色 X 组成的。
Information： 显示信息图标，由一个圆圈及其中的小写字母 i 组成的。
None： 不显示图标。
Question： 显示提问图标，是由一个圆圈和其中的一个问号组成的。
Warning： 显示警告图标，一个黄色背景的三角形及其中的一个感叹号组成的。

Show方法会返回一个值，该值是一个DialogResult型枚举，对应于用户在关闭窗口之前所单击的按钮，包括以下可选值：

Abort： 单击了“中止”按钮
Cancel： 单击了“取消”按钮
Ignore： 单击了“忽略”按钮
No： 单击了“否”按钮
OK： 单击了“确定”按钮
Retry： 单击了“重试”按钮
Yes： 单击了“是”按钮

下面提供了一些MessageBox的示例，请分别复制到命令窗口执行测试。

示例一

最简单的显示：

MessageBox.Show("Visual Basic一点不难！")

显示的对话框：

示例二

加上标题：

MessageBox.Show("Visual Basic一点不难！", "提示")

显示的对话框：

示例三

指定要显示的按钮：

MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo)

显示的对话框：

示例四

加上图标：

MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

显示的对话框：

示例五

判断用户单击了哪个按钮：

Dim Result As DialogResult
Result = MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    MessageBox.Show("不错，说明你已经认真学习了。","提示")
Else
    MessageBox.Show("好好学习吧，你会认同这个看法的。","提示")
End if

　

本页地址：http://www.foxtable.com/webhelp/topics/0326.htm