Matriser les caractères sur un textbox

Question

Bonjour,

je viens de créer une userform avec des textbox. Dans cette dernière, il n'est possible que de saisir des chiffres. J'ai trouvé la propriété qui permet de limiter le nombre de caractère :"MaxLenght". Je l'ai mis à 7.
je voudrais faire en sorte que si un utilisateur saisit moins de 7 chiffres, il y un msgbox qui apparait et puis le textbox redevient vide.

voici le code que j'ai mis :

Private Sub TextBox2_AfterUpdate()
If IsNumeric(UserForm1.TextBox2) = False Then
MsgBox "Merci de saisir que des chiffres", vbCritical + vbOKOnly, "Numéro Client"
UserForm1.TextBox2 = ""
End If

If TextBox2.MaxLength <> 7 Then
MsgBox "le numéro client doit contenir 7 chiffres !", vbokony + vbCritical, "Numéro client"
UserForm1.TextBox2 = ""
End If

End Sub


mais ça marche pas......d'ou ma demande auprès de vous

MERCI D'AVANCE !!!

Mayzz · Answer

Bonjour,

Merci de regarder avant de poster = > Thèmes / VB.NET et VB 2005 / Divers / Débutants / Matriser les caractères sur un textbox Ton programme est en vb6/VBA
                                                                              
Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer. <

pile_poil · Answer

si tu remplaçais If TextBox2.MaxLength <> 7 Then par If len(TextBox2..Text) <> 7 Then ça devrait aller beaucoup mieux Mayzz a raison fais attention au thème dans lequel tu postes [reglement.aspx ]si c'est la solution, penser : REPONSE ACCEPTEE

schevs10 · Answer

merci de ta réponse

je ferais plus attention la prochaine fois !

Matriser les caractères sur un textbox

3 réponses

Votre réponse