vb.net 教程 3-3 窗体编程 消息对话框

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
消息对话框类似于javascript中的 Alert，但是vb.net 中还提供了更多的功能。

 

一个简单的消息对话框类似于下面的代码：

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MessageBox.Show("这里是消息描述", "这里是标题", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

MessageBox.show 的参数包括：消息框中显示的文本、标题栏中显示的文本、按钮样式、图标样式

按钮样式包括如下几种（摘自MSDN）：

AbortRetryIgnore 消息框包含“中止”、“重试”和“忽略”按钮。
 OK 消息框包含“确定”按钮。
 OKCancel 消息框包含“确定”和“取消”按钮。
 RetryCancel 消息框包含“重试”和“取消”按钮。
 YesNo 消息框包含“是”和“否”按钮。
 YesNoCancel 消息框包含“是”、“否”和“取消”按钮。

 

图标样式包括如下几种（摘自MSDN）：

 Asterisk 该消息框包含一个符号，该符号是由一个圆圈及其中的小写字母 i 组成的。
 Error 该消息框包含一个符号，该符号是由一个红色背景的圆圈及其中的白色 X 组成的。
 Exclamation 该消息框包含一个符号，该符号是由一个黄色背景的三角形及其中的一个感叹号组成的。
 Hand 该消息框包含一个符号，该符号是由一个红色背景的圆圈及其中的白色 X 组成的。
 Information 该消息框包含一个符号，该符号是由一个圆圈及其中的小写字母 i 组成的。
 None 消息框未包含符号。
 Question 该消息框包含一个符号，该符号是由一个圆圈和其中的一个问号组成的。 不再建议使用问号消息图标，原因是该图标无法清楚地表示特定类型的消息，并且问号形式的消息表述可应用于任何消息类型。 此外，用户还可能将问号消息符号与帮助信息混淆。 因此，请不要在消息框中使用此问号消息符号。 系统继续支持此符号只是为了向后兼容。
 Stop 该消息框包含一个符号，该符号是由一个红色背景的圆圈及其中的白色 X 组成的。
 Warning 该消息框包含一个符号，该符号是由一个黄色背景的三角形及其中的一个感叹号组成的。

 

例如一下代码，将显示一个有两个按钮（Yes 和 No）以及警告图标的消息框

MessageBox.Show("这里是消息描述", "这里是标题", MessageBoxButtons.YesNo, MessageBoxIcon.Warning)

消息的文本是可以分为很多行的，只需要在文本中加入换行符（ControlChars.CrLf、vbCrLf、Chr(13)）就可以了，例如：

        MessageBox.Show("这里是消息描述:" & ControlChars.CrLf & "1：提示消息1；" & Chr(13) & "2、提示消息2",
                        "这里是标题", MessageBoxButtons.YesNo, MessageBoxIcon.Warning)

如果需要根据用户按下的按钮进行处理，那么可以使用以下方法：

        If MessageBox.Show("今天是你的生日吗？", "生日提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
            MessageBox.Show(Format(Now, "M月d日") & "是你的生日")
        Else
            MessageBox.Show(Format(Now, "M月d日") & "不是你的生日")
        End If

注意，等号后面的DialogResult要和MessageBox中的按钮样式对应。

上面代码，如果用户按下了“是”按钮，那么结果如下：

 

更多MessageBox.show()参数，请大家参看MSDN。

另外vb6下面的MsgBox()方法仍然可以使用，

 

学习更多vb.net知识，请参看 vb.net 教程 目录