Windows窗體不關閉

Question

這是我的代碼：

Private Sub frmName_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing 
    If e.CloseReason = CloseReason.UserClosing Then 
     If MessageBox.Show("Are you sure you want to logout?", "Exit", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then     
      Me.Close() 
     Else 
      e.Cancel = True 
     End If 
    End If 
End Sub 

如果我點擊no將取消的形式結束，但是當我點擊yes會出現反覆的消息框。我想要發生的是當我點擊關閉按鈕，並點擊yes它將關閉窗體。我怎樣才能解決這個問題？

Answer 1

由於表格已經關閉，因此不需要再次撥打Close()。下面的代碼應該工作：

Private Sub frmName_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing 
    If e.CloseReason = CloseReason.UserClosing Then 
     If MessageBox.Show("Are you sure you want to logout?", _ 
       "Exit", MessageBoxButtons.YesNo, _ 
       MessageBoxIcon.Question) = Windows.Forms.DialogResult.No Then     
      e.Cancel = True 
     End If 
    End If 
End Sub