Discussion :

[JOS.FRAN]

Bonjour,

Est il possible dans un text box que le retour chariot valide un mot de passe ?
Actuellement j'ai un autre bouton "Validation" qui déclenche la validation....

merci pour la réponse

[DarkMolo]

Salut,

Tu n'as qu'à t'abonner à l'évènement KeyPress ou KeyDown de ce TextBox, et mettre une condition sur la touche préssée, et puisque tu dis que t'as déjà un bouton Validation qui déclenche la validation, il te suffit de mettre ButtonValidation.PerformClick().

[thierry007]

effectivement c'est la bonne solution, mais y a t'il possibilité de supprimer le bip comme dans VB6 ou l'on ajoutais Keyascii = 0

Code :

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

  If KeyValue = Keys.Return Then

[JOS.FRAN]

Re bonjour,

je suis débutant donc excuse mon ignorance...

m'abonner à un évènement keypress de ce textbox d'accord

par contre je n'arrive pas à mettre une condition sur le retour chariot.

if keys.return then
msgbox("...........")
endif

cela m'affiche le message quelquesoit la touche enfoncée !

[Kelpan]

Normal, tu ne testes rien dans ta condition ...

Code :

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

1
2
3
4
 
If e.KeyValue = Keys.Return Then
  ...
End If

[JOS.FRAN]

Merci pour le code . Mais à ce propos ou trouver une aide complète sous vb 2005 express ?

certaines rubriques dans l'aide sont suffisantes mais d'autres sont inexistantes !

[thierry007]

http://dotnet.developpez.com/cours/

[JOS.FRAN]

Bonjour
Apparemment vb.net et vb express 2005 ont des differences puisque je n'ai pu appliquer les solutions préconisées dans les messages précédents.

j'ai trouvé la solution suivante :

dim touchepressee as char

et dans l'évenenment keypress de mon textbox j'ai inséré le code suivant :

if touchepressee = chr(13) then
..............
end if

cela a l'air de marcher.....

[Kelpan]

Et ta variable TouchePressee tu l'alimentes comment !!??

[JOS.FRAN]

j'ai oublié :
touchepressee = e.keychar

[Kelpan]

Ok, Je crois avoir compris la confusion...

Dans KeyPress, on test un caractère (KeyChar), alors que dans KeyDown et KeyUp, on test une code touche (Enumération Keys).

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub MaZone_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles MaZone.KeyPress
  Select Case e.KeyChar
     Case Chr(13)
        MsgBox("....")
  End Select
End Sub
 
Private Sub MaZone_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MaZone.KeyDown
  Select Case e.KeyCode '(ou KeyValue, je ne me rappel plus)
     Case Keys.Enter, Keys.Return ' Normalement Enter suffit
        MsgBox("....")
  End Select
End Sub

[thierry007]

tourne en rond là