MessageBox

MessageBox.Show("是否要保存文件？",“标题”,MessageBoxButtons.YesNoCancel)

第一个参数指定消息框要显示的字符串

第二个参数指定消息框的标题

第三个参数指明消息框要显示的按钮

OK 确定

OKCancel 确定取消

AbortRetryIgnore 中止  重试  忽略

YesNoCancel 是 否  取消

YesNo  是否

RetryCancel 重试取消

第四个参数用于指定要显示的图标

MessageBoxIcon枚举

Asterisk

Error

Exclamation

Hand

Information

None

Question

Stop

Warning

第五个参数指定默认获得焦点默认按钮

MessageBoxDefaultButton枚举

Button1

Button2

Button3

获得点击结果

Dim result  As DialogResult

result = MessageBox.Show()

If result = Windows.Forms.DialogResult.Yes Then

方法

Else If result = Windows.Forms.DialogResult.Cancel Then

方法

End If

OK 窗口标签为OK

Cancel 窗口标签为取消

Abort 窗口标签为中止

Retry 窗口标签为重试

Ignore 窗口标签为忽略

Yes 窗口标签为是

No 窗口的返回值是No

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim s As String = "您的计算机配置为:" &(连接字符串) vbCrLf(隔行显示)

s &= "姓名:" & TextBox1.Text & vbCrLf _ & "手机号码：" & TextBox2.Text & vbCrLf _ & "授权:" & ComboBox1.Text & vbCrLf _ & "用户级别:" & ComboBox2.Text MessageBox.Show(s, "人员信息") End Sub