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
Version imprimable
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
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().
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:If KeyValue = Keys.Return Then
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 !
Normal, tu ne testes rien dans ta condition ... :roll:
Code:
1
2
3
4 If e.KeyValue = Keys.Return Then ... End If
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 !
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.....
Et ta variable TouchePressee tu l'alimentes comment !!??
j'ai oublié :
touchepressee = e.keychar
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:
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
tourne en rond là
:marteau: