Demande pour un raccourciRésolu

Question

Salut à tous et bonne année 2007

J'ai une question,

Je developpe une application sur VB2005 Express, et je cherche à faire ceci 

Dans un textbox je tape mon texte a cherche et des que je frappe sur le clavier "Entrée" je voudrai  lancer une de mes function , mais comment faire cela ?
car aujourd'hui j'ai mon text box et à coté un Button dans lequel ma function est lancer quand je clique dessus

J'espere que vous m'avez compris

Cordialement
Sébastien.L

cs_Exploreur · Accepted Answer

Salut,
Essaye cela...je pense

Private Sub Text1_KeyPress(KeyAscii As Integer)
IF KeyAscii =13 then 'détection touche entrée
ICI TU LANCE TA FUNCTION
End if
End Sub

A+
Exploreur

jmfmarques · Answer

On a compris ...

Moi j'ai compris 2 choses :
1) que tu confonds raccourci avec touche de raccourci
2) qu'il vaut mieux que ta textbox ne soit alors pas multriligne...

Si  tu y tiens : la valeur ascii de la touche ENTER est 13

cs_vara956 · Answer

Bonsoir et Merci

En efftet, je me suis mal exprimé, 
Donc dans textbox1_Keypress je dois teste  si touche Entrée a été  appuyée dans ce cas, alors je lance ma fonction c bien cela ? 
mais comment faire pour detecter cela , je debute sur ce genre de chose, mais tres gentil de ta pars d'avoir repondu !

Amicalement

jmfmarques · Answer

Oui c'est celà !
et si tu as pressé la touche Enter, Keyascii 13>> et tu exécutes donc tes instructions !

cs_Exploreur · Answer

A une minute prés !!!!
A+ Jmfmarques
Exploreur

cs_casy · Answer

tu peux aussi le faire dans l'évènement keydown :

        Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e 
As System.Windows.Forms.KeyEventArgs) Handles 
TextBox1.KeyDown
                If e.KeyCode = Keys.Enter Then
                        e.SuppressKeyPress = True ' Pour filtrer cette saisie puisqu'on la traite 
ici
                        MsgBox("coucou")             ' Ici tu mettra le 
code d'appel de ta fonction
                End If
        End Sub

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

cs_Exploreur · Answer

Cool Casy, tu me montre une autre façon que je ne savais pas..
A+
Exploreur

cs_vara956 · Answer

OUAAAh trop forts je savais pas j'ai appris une chose 


 


Super merci a toi


ca marche au top


 


Merci a toi aussi Exploreur tre sympas a vous deux


Amicalement

Julien237 · Answer

Moi j'ai plutot l'impression qu'il voudrais faire :

        Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e  As System.Windows.Forms.KeyEventArgs) Handles  TextBox1.KeyDown
                If e.KeyCode = Keys.Enter Then
                        e.SuppressKeyPress = True ' (Tiens je connaissais pas ca !)
                        
                        Call [Text1.Text]  'Vous voyez ce que je veux dire 
                End If
        End Sub

Et donc s'il a des procédures 

Sub Yop()
...
Sub Pif()
....
Sub Flotch()
....

Que l'utilisateur puisse tapper Yop, Pif ou Flotch dans la textBox et que ca marche non ?
__________________________
Julien.

Julien237 · Answer

ha ben non ^^

__________________________
Julien.

cs_Exploreur · Answer

Comme dit le slogan de Casy : Le partage
A+
Exploreur

Demande pour un raccourci

11 réponses

Votre réponse

Discussions similaires