Discussion :

[tsdia2]

bonjour tout le monde

j'ai un champ de text dans lequel je saisie des valeur de type double

je veux que ma saisie se converti en un double avec deux chiffres apres la virgule
par exemple si je saisie 12,217 me donne 12,22

merci

[tomlev]

utilise Math.Round :

Code :

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

1
2
Dim x As Double = 12.217
Dim y As Double = Math.Round(x, 2) ' y vaut 12.22

Le 2e paramètre est le nombre de chiffres après la virgule

[tsdia2]

merci infiniment mais si je tappe par exemple 12,2 math.round(12,2) donne 12,2 tandis que moi je veux 12,20 en sorti

merci

[Danyel]

C'est normal !!!
Le fait de passer en valeur numerique, les zeros non significatifs sont automatiquement effaces.
Si tu as besoin d'avoir tes 2 chiffres apres la virgule, c'est à toi d'utiliser la commande Format(x, "0.00")

[Totanne]

Je ne connaissait pas Format(x, "0.00")
Perso j'utilise FormatNumber(MonSingle,2) qui te formate ca en chaine suivant les parametres locaux de la machine (virgule entre entier et décimales, espace entre les miliers, etc...)

[tsdia2]

Bonjour à tous merci pour vos réponses
ça marchai bien avec Format
je vais essayer Formatnumber auss


merci pour votre soutien