在关键事件中禁用Alt + F4功能

Question

如何防止在keydown事件中通过alt + f4键关闭窗体？我面临的问题是保持按住Alt键并按F4关闭窗体，但我想阻止窗体关闭。下面是我的代码

Private Sub frminstituteselect_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown 
    If e.Alt = True And e.KeyCode = Keys.F4 Then 
     e.Handled = True 
    End If 
End Sub 

Answer 1

尝试这样

Private ALT_F4 As Boolean = False 


Private Sub frminstituteselect_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Form1.FormClosing 
    If ALT_F4 Then 
     e.Cancel = True 
     Return 
    End If 
End Sub 


Private Sub frminstituteselect_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Form1.KeyDown 
    ALT_F4 = (e.KeyCode.Equals(Keys.F4) AndAlso e.Alt = True) 
End Sub 

或者干脆

Private Sub frminstituteselect_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Form1.FormClosing 
      e.Cancel = True 
    End Sub