Visual Basic MsgBox vbYesNo 单击“否”按钮时不接受

Question

我的 VB.NET 表单程序中有一个 MsgBox，附加了一个 vbYesNo 参数。 每当消息框显示时，我都会看到是和否按钮，但是无论我单击哪个按钮，我总是得到相同的结果。

这是我的代码：

MsgBox("Here's 2 options...", vbYesNo)
If vbYes Then
    MsgBox("You clicked yes")
Else
    MsgBox("You clicked no")
End If

我也尝试过与上面相同的 If 语句：

If vbYes Then
    MsgBox("You clicked yes")
ElseIf vbNo Then
    MsgBox("You clicked no")
End If

当我在 Messagee Box 上单击是或否时，我总是得到以下内容：

If vbYes Then
    MsgBox("You clicked yes")

我对 Visual Basic forms 比较陌生，所以如果这是一个简单的新手错误，我很抱歉。 我希望这些信息足以让 go 上。

谢谢您的帮助。

Answer 1

尝试以下操作：

选项 1 ：

If MessageBox.Show("Here's 2 options", "Select Option", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
    MessageBox.Show("You clicked yes", "Result")
Else
    MessageBox.Show("You clicked no", "Result")
End If

选项 2 ：

If MsgBox("Here's 2 options", vbYesNo, "Select option") = vbYes Then
    MsgBox("You clicked yes", vbOKOnly, "Result")
Else
    MsgBox("You clicked no", vbOKOnly, "Result")
End If

Answer 2

您的问题是您没有捕获 MsgBox 返回的值，您应该尝试以下操作：

   Dim a As MsgBoxResult = MsgBox("Here's 2 options...", vbYesNo)
    If a = vbYes Then
        MsgBox("You clicked yes")
    Else
        MsgBox("You clicked no")
    End If