Dim dlgRtn As DialogResult dlgRtn = MessageBox.Show("错误信息", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1) Select Case dlgRtn Case DialogResult.Yes MessageBox.Show("", "ok") Case DialogResult.No MessageBox.Show("", "no") End Select
{
.....
}
if(MessageBox(......)==IDCANCEL)
它的返回值可以在MSDN上查到
dlgRtn = MessageBox.Show("错误信息", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1)
Select Case dlgRtn
Case DialogResult.Yes
MessageBox.Show("", "ok")
Case DialogResult.No
MessageBox.Show("", "no")
End Select