Advertisement
6_2008-2009 Custom Controls/ Forms/ Menus #196192

Disable ALT+F4 in a Form

Disable the shortcut ALT+F4 in a Form

AI

Tóm tắt bởi 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.

Mã nguồn
original-source
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
Bình luận gốc (3)
Được khôi phục từ Wayback Machine