Valider TextBox

Salut à 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

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épondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro

Ca ne fonctionne pas, quand je pousse enter j'ai un Beep.

merci quand même

Dans les propriétés default = true
Ou en code              textbox.default = true


Jer

la propriété default n'existe pas pour un textbox

On peut essayer ça :

Crée un é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à !

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 ???

... C'est du VB6 ou du .Net                (j'en ai marre de poser cette question ....)
JB76000 m'a fait penser à ceci :
Si, dans ta forme, un des boutons Command a la propriété Default à True, l'évènement TextBox_KeyPress ne se déclenche pas.
Si la forme elle même a la propriété KeyPreview a True, elle verra le KeyPress avant les autres composants.
--> Lire l'aide de VB, tout y est expliqué

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro

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

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