Disable ALT+F4 in a Form
Disable the shortcut ALT+F4 in a Form
AI
Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Zdrojový kód
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (Shift = vbAltMask) Then
Select Case KeyCode
Case vbKeyF4
KeyCode = 0
End Select
End If
End Sub
Původní komentáře (3)
Obnoveno z Wayback Machine