messageboxbuttons.YesNo点击yes事件可以触发某个Click事件吗

Question

messageboxbuttons.YesNo点击yes事件可以触发Click事件吗，类似messageboxbuttons.yes.click+=new EventHandler(question_Click);这代码我乱写的，应该怎么写呢，请各位大神帮帮忙！！！

Answer 1

Private Sub Command1_Click()
    If MsgBox("选什么？", vbQuestion + vbYesNo) = vbYes Then
        Debug.Print "选了 Yes"
    Else
        Debug.Print "选了 No"
    End If
End Sub

Answer 2

不能触发你期望的事件，除非你用一个窗体来自定义一个“对话框”。要在你调用 MsgBox 或 MessageBox.Show 的代码段判断其返回值。在 VB 6 中如楼上。C# 如下if (MessageBox.Show("选什么？", "", MessageBoxButtons.YesNo, MessageBoxIcon.Question ) == DialogResult.Yes)
{
    MessageBox("点击了按钮“是”");
}
else
{
    MessageBox("点击了按钮“否”");
}实际上你所期望事件的处理过程，已经封装在相应的函数中，没有提供对外的接口。

Answer 3

那个是系统的消息框，就像个函数，只给你个返回值的。 你可以根据返回值判断点了哪个按钮，然后调用某个按钮的click事件过程 call question_Click

Answer 4

If MessageBox.Show(...) = DialogResult.Yes Then
    button2.PerformClick()
End If