Alt + F4

2 réponses

13/02/2004 à 19:29

Bonjour,

Est-ce possible de désactiver la fermeture forcée par ces 2 touches ?
Merci

@ +
b(°!°)rbbu

2 réponses

Jean-Jacques Antille

14/02/2004 à 12:51

Voici un exemple qui devrait faire ton bonheur:

Option Compare Database
Public VoirsiAlt As Boolean
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF4 And Shift = acCtrlMask Then
MsgBox ("Vous devez utiliser le bouton ""Fermer""" & vbCrLf & "pour
fermer le formulaire!")
End If

If KeyCode = vbKeyF4 And Shift = acAltMask Then
VoirsiAlt = True
Else
VoirsiAlt = False
End If
End Sub

Bonne chance

--
Cordiales salutations.
Jean-Jacques

http://www.webmister.ch/school/accueil.asp
027 458 40 61
078 665 75 74
"" a écrit dans le message de news:

Bonjour,

Est-ce possible de désactiver la fermeture forcée par ces 2 touches ?
Merci

@ +
b(°!°)rbbu

16/02/2004 à 14:20

Salut,
Je vais essayer çà !
Merci.
@ +
b(°!°)rbbu

"Jean-Jacques Antille" a écrit dans le message
de news: 402e0beb$

Voici un exemple qui devrait faire ton bonheur:

Option Compare Database
Public VoirsiAlt As Boolean
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF4 And Shift = acCtrlMask Then
MsgBox ("Vous devez utiliser le bouton ""Fermer""" & vbCrLf &
"pour

fermer le formulaire!")
End If

If KeyCode = vbKeyF4 And Shift = acAltMask Then
VoirsiAlt = True
Else
VoirsiAlt = False
End If
End Sub

Bonne chance

--
Cordiales salutations.
Jean-Jacques

http://www.webmister.ch/school/accueil.asp
027 458 40 61
078 665 75 74
"" a écrit dans le message de news:

Bonjour,

Est-ce possible de désactiver la fermeture forcée par ces 2 touches ?
Merci

@ +
b(°!°)rbbu

Alt + F4

2 réponses

Veuillez sélectionner un problème