Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1313 connectés 

  FORUM HardWare.fr
  Programmation

  [ VB6 ]

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[ VB6 ]

n°10304
Webman
Posté le 19-01-2001 à 11:21:41  profilanswer
 

Salut,
 
Je cherche le code pour que quand j'appuie sur une touche une action se produise du style "Echap" --> ferme la page.
Je pense qu'il faut utiliser KeyPress ou KeyDown mais les exemples fournis avec VB ne sont pas trés clair? donc est-ce que qq un peu me donner le code pour faire cela, un code du style
If... Then .... serait le bien venu mais je prends toute sorte de code.
 
Webman
 
PS: si je suis pas clair dans ma demande je peux préciser.

mood
Publicité
Posté le 19-01-2001 à 11:21:41  profilanswer
 

n°10307
Lucile
La petite fleur du forum
Posté le 19-01-2001 à 11:28:07  profilanswer
 

form_onkeypress je crois...

 

n°10308
Lucile
La petite fleur du forum
Posté le 19-01-2001 à 11:28:37  profilanswer
 

c'est une sub système... regardes les sub disponibles pour tes forms...

 

n°10314
Webman
Posté le 19-01-2001 à 11:50:34  profilanswer
 

Il y a KeyPress KeyDown KeyUp mais y faut y mettre quoi comme code ?
 
 
Merci d'avance,
Webman

n°10316
Lucile
La petite fleur du forum
Posté le 19-01-2001 à 11:54:03  profilanswer
 

C'est KeyPress déjà.
 
(KeyDown + KeyUp = KeyPress)
 
Sinon pour échap, je crois que c'est 39, mais je ne suis pas sûr...
 
Essaie de trouver une table de caractères ASCII

 

n°10319
Webman
Posté le 19-01-2001 à 12:01:39  profilanswer
 

Merci Lucile,
Pour Echap c'est la 27.
Sinon qq un peut me donner le code?
 
Webman

n°10325
Lucile
La petite fleur du forum
Posté le 19-01-2001 à 12:14:37  profilanswer
 

ben ça doit être du genre...
 
sub private form_keypress(byval ascii_code)
ssssif ascii_code = 27 then
ssssssssform.visible = false
ssssend if
end sub

 

n°10337
Webman
Posté le 19-01-2001 à 13:58:45  profilanswer
 

Merci bcp,
Je viens d'essayer ça marche, j'ai essayé plusieurs fois mais ça ne fonctionnait pas car je mettais mon code dans le Form et pas dans le RichTextBox...
Tu avait presque tout juste en fait c'était KeyAscii au lieu de ascii_code...
Voici le bon code:
If KeyAscii = 27 Then frmPE.Visible = False
 
Encore merci,
Webman

n°10338
Lucile
La petite fleur du forum
Posté le 19-01-2001 à 14:02:59  profilanswer
 

2riz1

 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [ VB6 ]

 

Sujets relatifs
[VB6] Comment imprimer ?[VB6] Gestion d'un rézo (TCP/IP ou IPX/SPX ...)
Plus de sujets relatifs à : [ VB6 ]


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR