Discussion :

[Jiyuu]

Bonjour,

Je calcule dans un Label la division entre deux valeurs de texbox.
Je souhaite arrondir la valeur trouvé à 1 ou 2 chiffre après la virgule.

Comment faire???

[Jérôme Lambert]

Code :

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

1
2
3
Dim valeur As Single
valeur = 5.123
MessageBox.Show(Format(valeur, "#0.00"))

[Jiyuu]

Désolé, mais si je copie et remts ton code en forme, c'est la valeur 0.00 qui sort et non mon arrondi...

[Jérôme Lambert]

Preuve à l'appui

[Jiyuu]

Je ne dis pas que ton code ne marche pas, mais seulement que je rencontre un problème dans mon formulaire.
Voici un extrait de mon code:

Dim valeur as single
valeur = (TextBox1.Text / (3600 * 3.14 * (TextBox2.text * TextBox3.Text / 4)))
Label1.text = format(valeur, "#0.00")

Dans ce cas, j'ai bien 0.00 qui sort.

Peux-tu m'aider

[BassBeat]

Ca ne résoudra peut-être pas ton problème, mais je ne sais pas si faire des opérations numériques sur des .Text donne des résultats cohérents...

Si tu mets un point d'arrêt sur la ligne du "format(..." et que tu regardes ce qu'il y a dans valeur, ça donne quoi ?