VB6: ALT-F4 på en fullscreen form

Du kunne fange keypress manuelt: Læg denne Sub i Form1:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   
    If ((Shift And vbAltMask) > 0) And KeyCode = vbKeyF4 Then
        Unload Form1  'eller hvad der nu skal gøres.....
    End If

End Sub

/tjacob

Hva' så?    Er det ikke på tide at lukke? Hvis ikke du kan bruge svaret, så tag points selv, eller uddyb spørgsmålet..........