VB.NET MsgBox是仅在第二次使用时有效？

下面是我的代码。当我单击表单上的X按钮时，消息框显示并单击“否”起作用，但当我单击“是”时，消息框关闭并再次快速出现，然后第二次单击任一按钮将关闭表单。怎么了

    Private Sub Config_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
    Dim result = MessageBox.Show("Would you like to quit?", MessageBoxButtons.YesNo)
    If result = DialogResult.No Then
        e.Cancel = True
    ElseIf result = DialogResult.Yes Then
        Application.Exit()
    End If
End Sub

---

提前感谢

应用程序。退出

将导致表单（递归）关闭，以便再次看到消息框。如果用户在消息框中按Yes，您应该在事件处理程序中不执行任何操作，并允许应用程序退出继续

---

如果不设置

e.Cancel=True

，则表示希望表单关闭继续。

此代码工作正常

 Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
            If (MsgBox("Are you sure to Close", MsgBoxStyle.YesNo, "Close Event") = MsgBoxResult.Yes) Then
                e.Cancel = False
            Else
                e.Cancel = True
            End If
End Sub

---

谢谢就是这么简单。如果表单是使用Show方法显示的，那么就不需要调用Dispose。该表单将被自动处理。