interdire les caracteres dans une textbox

Question

Bonjour,

Je voudrais que l'utilisateur ne puisse pas saisire de caractères dans la textbox mais juste des chiffres !
Donc je voudrais soit pouvoir convertir la chaïne de caractreres en un nombre entier soit interdire la saisie des caracteres ! Je preferai la premiere solution !

Comment puis-je faire ?

Merci d'avance !

Clonk · Answer

Je peux te filer une piste pour la 2eme solution:
dans ta textbox, tu utilise la fonction KeyPress(Keyascii as Integer) (<- Menu à droite du nom de tes contrôle)
Il faudrait que tu cherches les codes ASCII  des nombres (tu peux trouver ç aavec des convertisseurs ASCII sur le site) et tu fais:
If Keyascii > #valeur de 9# or Keyascii < #valeur de 0# then
    Keyascii = 0
end if

Voilà
j'espère que ça va t'aider =)
Clonk

Dinbougre · Answer

sur l'evenement texte_key_press
tu fais :

if not is numeric(right(chaine,1)) then
   texte.text = left(chaine, len(chaine)-1)
end if

voilà ça marche ça

AdilELHASSOUNI · Answer

Ceci sera incorrect ! si on insère un caractère non numérique au milieu des valeurs sasies précédement parce tu teste est ce c'est numérique le caractère se trouvant à droite du contrôle TextBox la première solution (celle qui s'exécute à l'événement KeyPress est la meilleure)

Merci de ta compréhension !

deck_bsd · Answer

autre moyen plus simple , ici se sera pour les chiffre, donc interdit de taper un carat&#232;re.



Text1_keypress( keyascii as integer)



if keyascii < 0 or keyascii > 9 then

    msgbox "interdit", vbokonly,"erreur"

end if





0-9 est l'intervale des chiffre en code ascii, donc si on tape pas un code ascii entre ces 2 limite, c'est refus&#233;.





Bonne progra

deck_bsd · Answer

oups &#233; oubli&#233; le end sub lol

Interdire les caracteres dans une textbox

5 réponses

Discussions similaires