Limiter les nombre decimaux a 2 chifre apres la virgule
alucard59300
Messages postés17Date d'inscriptionmercredi 5 avril 2006StatutMembreDernière intervention13 septembre 2009
-
21 juin 2006 à 14:54
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
21 juin 2006 à 23:50
bonjour voila je doit limiter les decimaux a 2 chifre apres la virgule mais j'ai plus d'une centaine de textbox en je voudrai savoir comment faire merci
Polack77
Messages postés1098Date d'inscriptionmercredi 22 mars 2006StatutMembreDernière intervention22 octobre 20191 21 juin 2006 à 15:16
Heeeee, tes textbox sont indexer? Si oui met dans ta procédure de modification de textbox (ou tu recois l'indice) un test sur chaine de carac :
if (instr(1,tetxbox1(indice).text,",") - len(tetxbox1(indice).text) > 2) then left(tetxbox1(indice).text,(instr(1,tetxbox1(indice).text,",") + 2))
Comme cas si un utilisateur met un 3ém chifre apprés la virgule il est umédiatement supprimer
Si non tu peut faire ~ la même chose dans la procédure "validate" (s'execute à la sorti du textbox) et dans ce cas tu peut même faire un arondi au lieu de supprimer simplement les dernier chifre.
Si tes textbox ne sont pas indexer, heeeeeeeeee, domage il faut que tu fase la procédure pour chaque textbox (le VBA ne gére pas les textbox, ou tout autre objet, indexer).
Si non peut être peut tu métre un masque de saisie.
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 21 juin 2006 à 23:50
salut,
masque de saisie possible en VB6 oui.
le plus simple est l'indexation des contrôle et de gérer au keyup ou keypress.
sinon en gérant directement la saisie sur la form (en KeyPreview = True) en récupérant le zone de texte qui a le focus.
++