Discussion :

[gerarddurand]

Bonsoir,

Je voudrais fermer un formulaire avec une combinaison de touches. Je sais le faire avec une seule touche comme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if keyascii=64 then docmd.close

par exemple, mais je n'arrive pas à combiner deux ou trois touches.

Merci par avance pour votre aide.

Cordialement.

[mumen]

Salut

Cela dépend de l’événement ou tu places ton code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Texte0_KeyDown(KeyCode As Integer, Shift As Integer)
 
ou 
 
Private Sub Texte0_KeyPress(KeyAscii As Integer)

Dans le premier cas, tu as la variable Shift qui t'indique les valeurs des témoins.

[gerarddurand]

Bonjour,

Merci pour ta réponse Mathieu mais je ne comprends pas. Peux-tu développer par un exemple .
cordialement.

[mumen]

Salut Gérard

Il y a un moment ou l'aide est ton amie et la curiosité ton alliée...

Si tu sais taper un code avec KeyAscii, c'est que tu as su créer un événement MonContrôle_KeyPress.

Si tu as su créer un événement MonContrôle_KeyPress, tu sauras créer un événement MonContrôle_KeyPress. C'est à dire que au lieu de "sur touche activée" tu prend "sur touche appuyée" et là tu vois qu'un paramètre est là en plus : Shift

A ce moment, tu met dans ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Debug.Print KeyCode, Shift

Tu t'arrange pour voir la fenêtre de débogage et tu lance le code pour voir ce qui se passe par en dessous quand tu tapes des touches dans ton contrôle.

Et si tu veux programmer proprement,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Debug.Print KeyCode, Shift, Shift And acShiftMask, Shift And acCtrlMask, Shift And acAltMask

[gerarddurand]

salut Mathieu

Merci pour le temps passé à m'aider. Tout ce que tu préconises je l'avais déjà découvert dans l'aide access ou dans divers sites. J'ai bien fouillé un peut partout.
Je voulais simplement pouvoir fermer un formulaire avec une combinaison de touches.
Je vais faire autrement avec un mot de passe.

Salutations.

[mumen]

salut Mathieu

Merci pour le temps passé à m'aider. Tout ce que tu préconises je l'avais déjà découvert dans l'aide access ou dans divers sites. J'ai bien fouillé un peut partout.
Je voulais simplement pouvoir fermer un formulaire avec une combinaison de touches.
Je vais faire autrement avec un mot de passe.

Salutations.

Argh
On s'est mal compris !

Désolé Gérard pour l'insinuation déplacée ! J'en remet une couche tu t'es très mal expliqué !

Je voudrais fermer un formulaire avec une combinaison de touches. Je sais le faire avec une seule touche comme
Code :
if keyascii=64 then docmd.close
par exemple, mais je n'arrive pas à combiner deux ou trois touches.

• Depuis où désire tu fermer ce formulaire ?
• Quelle combinaison de touches ?
• Où est ton code ?
• Quel est ton code complet ?

Et aussi, la macro AutoKeys, tu connais ?