Valider TextBoxRésolu

Question

Salut &#224; tous,

Voila je voudrais valider mon textBox quand je tape sur "ENTER" au lieu de devoir cliquer sur le bouton rechercher de mon application .... Mais je ne sais pas comment faire !

Merci de m'aider

cs_nico1610 · Accepted Answer

Reprend ce que t'as dit jack a une différance pres : remplace ~~keypress~~ par keydown !! et non pas ~~keyup~~ (keyup qui est bien du vb6) En effet : il y exsiste trois commandes : une qui réagit quand tu arretes de presser la touche (keyup) une qui réagit quand tu es en train d'appuyer sur la touche (keypress) une qyu réagit quand tu appuyes sur la touche.(keydown) Soit dans l'ordre chronologique KeyDown >> KeyPress >> KeyUp Il faut aussi savoir que le fameux BIP de windows réagit au moment de la commande keypress . Donc il faut pouvoir détécté la pression de la touche avant windows, executer son code et enfin faire croire à windows qu'il ne c'est rien passé soit : (KeyDown comme ces deux soeur est un evenement qui s'affiche de la même facon que Form_Load ou même Command1_Click : un double clic sur l composant TEXTBOX puis dans le menu déroulant en haut a droite tu séléction [KEYDOWN] ) (Code compatible VB4,5,6)(Code incompatible VB.NET !!) Private Sub Text1_KeyDown (KeyCode As Integer) If KeyCode = 13 Then '13 est le retour chariot (ENTER) monBouton_Click 'La fonction que tu executes KeyCode = 0 'Et la tu fait croirea windows 'qu' aucune touche n'est préssé 'et comme ca pas de beep End If End Sub Voila. donc jack, dsl mais tu n'avais pas raison cette fois ci! PS:Profite bien de cette reponce, rare sont les fois ou je suis aussi soigné !

cs_Jack · Answer

Salut
Classique :
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = vbKeyReturn Then
        monBouton_Click
        ' Evite le beep
        KeyAscii = 0
    End If
End Sub

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Champion du monde de boule de cristal - 2005
Le savoir est la seule mati&#232;re qui s'accro

cs_moi4975 · Answer

Ca ne fonctionne pas, quand je pousse enter j'ai un Beep.

merci quand m&#234;me

JB76000 · Answer

Dans les propri&#233;t&#233;s default = true
Ou en code              textbox.default = true

Jer

cs_moi4975 · Answer

la propri&#233;t&#233; default n'existe pas pour un textbox

tinux · Answer

On peut essayer &#231;a :

Cr&#233;e un &#233;venement KeyUp sur ton Textbox

et place le code :

    if e.keycode = Keys.Enter then

        'ici ton code

    End if

Sa te donne sa :

Private Sub TextBox1_KeyUp(ByVal sender As System.Object, Byval e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp

    if e.keycode = Keys.Enter then

        'ici ton code

    End if

End sub

Voil&#224; !

cs_moi4975 · Answer

Private Sub txtRechercher_KeyUp(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then
       pctRecherche_Click
    End If
End Sub

Merci ,Voila le code du dessus fonctionne.

Mais j'ai un Beep y'a t'il moyen de l'enlever ???

cs_Jack · Answer

... C'est du VB6 ou du .Net                (j'en ai marre de poser cette question ....)
JB76000 m'a fait penser &#224; ceci :
Si, dans ta forme, un des boutons Command a la propri&#233;t&#233; Default &#224; True, l'&#233;v&#232;nement TextBox_KeyPress ne se d&#233;clenche pas.
Si la forme elle m&#234;me a la propri&#233;t&#233; KeyPreview a True, elle verra le KeyPress avant les autres composants.
--> Lire l'aide de VB, tout y est expliqu&#233;

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Champion du monde de boule de cristal - 2005
Le savoir est la seule mati&#232;re qui s'accro

cs_moi4975 · Answer

c'est du VB6 et je n'ai pas de command avec la propri&#233;t&#233; default = true sur ma form

tinux · Answer

Ok et pas non plus de KeyUP ==> .NET

cs_Jack · Answer

D&#233;sol&#233;, mais en VB6, le code que je t'ai mis fonctionne tr&#232;s bien.
J'esp&#232;re que tu as mondifi&#233; le nom des objets ... Text1 et monBouton

cs_Jack · Answer

lol, si j'ai raison et, Nico, en VB6, "KeyCode = 0" ne fonctionne pas ! Il g&#233;n&#232;re quand m&#234;me le beep.

La fonctionnalit&#233; de d&#233;tection du vbKeyReturn dans le KeyPress fonctionne, c'est garanti.
Le KeyAscii = 0 pour &#233;viter le Beep fonctionne, c'est garanti aussi
Franchement, je ne vois pas o&#249; est le probl&#232;me ...

Pour en revenir aux KeyDown et KeyUp :
Ces &#233;v&#232;nements renvoient un KeyCode, pas un KeyAscii : La grosse diff&#233;rence est que KeyCode renvoie la touche (mat&#233;rielle) clavier press&#233;e.
Avantage : Elles voient toutes les touches de fonction. 
Inconv&#233;nient 1 : si on appuie sur "a", le KeyCode renvoie de code ascii de "A" (et pas "a")
Inconv&#233;nient 2 : Un "KeyCode = 0" ne fonctionne pas et g&#233;n&#232;re un Beep

Le KeyPress est donc plus indiqu&#233;, mais vous faites bien comme vous le voulez ...

Vala
Jack, MVP VB
 Je ne r&#233;pondrai pas aux messages priv&#233;s 

Champion du monde de boule de cristal - 2005
Le savoir est la seule mati&#232;re qui s'accro

cs_nico1610 · Answer

merci pour cette précision jack ....
Bizzard mais chez moi le KeyCode=0 fonctionne !

Enfin, avec tout ca MOI4... va pouvoir faire ces propre test et voir ce qui marche le mieux pour lui !

tinux · Answer

Je suis sous .NET et mon KeyUP fonctionne tr&#232;s bien ! Et c'est aussi du vb6.. mais sa je savais pas !

cs_moi4975 · Answer

Merci &#224; tout les deux mais apr&#232;s avoir essayer toute vos id&#233;es c'est finalement le KeyPress qui fonctionne le mieux (sans Beep) le keydown marche aussi mais j'ai toujours un Beep

cs_nico1610 · Answer

ok ... Jack avait raison ... 
Sans rancune aucune Jack! ;)

anwar666 · Answer

salut !! 
j'ai besoin  du code de l'événement enter qui effectue la recherche sur un textbox sans cliqué sur un bouton en vb.net 2008 !!!
et merci d'avance !!
cordialement !!