Mit wenigen Zeilen unterdrücken Sie das Schließen
    einer Form via ALt+F4:

ERFORDERLICHE OBJEKTE

-- keine --

FORM-CODE

   Private Sub Form_Load()
      Caption = "Drücken Sie Alt+F4"
   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