ログアウトボタンをクリックすると、ログアウトメッセージボックスが2回表示されます

Question

アプリケーションを終了する前に確認を実行するか、ログアウトボタンをクリックしてアプリケーションをログアウトするか、をクリックしてアプリケーションを閉じます。アプリケーションを直接閉じると、メッセージボックスが一度表示されます。しかし、ログアウトボタンを使用すると、メッセージボックスが2回表示されます。

ので、コーディングは基本的に次のようになりさ：

Private Sub btnLogOut_Click(sender As Object, e As EventArgs) Handles btnLogOut.Click 
    If logOut() Then 
     Me.Dispose() 
     frmLogIn.Show() 
    End If 
End Sub 

Private Sub frmHome_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing 
    If logOut() Then 
     Me.Dispose() 
     frmLogIn.Show() 
    Else 
     e.Cancel = True 
    End If 
End Sub 

Public Function logOut() As Boolean 
    Dim respond = MessageBox.Show("Are you sure you want to log out?", "Log Out", MessageBoxButtons.YesNo, MessageBoxIcon.Question) 
    If respond = DialogResult.Yes Then 
     blnResult = True 
    Else 
     blnResult = False 
    End If 
    logOut = blnResult 
End Function 

だから、誰が助けることができますか？ Me.Disposeであるあなたの2行目//四行目

は、あなたが他の用語では、あなたがそれを閉じて、フォームを配置する場合は、あなたのログアウトボタンイベントで

Answer 1

は

If logOut() Then //first line 
    Me.Dispose()//second line 
    frmLogIn.Show()//third line 

終了をクリックします。したがって、あなたのフォームを破棄するため、あなたのform_closeイベントがトリガーになります。メッセージボックスが2回ポップアップするのはこのためです。