Affichage résultat calcul dans une textbox

Bonjour,

je souhaite afficher le résultat de formule

Me.TBIMC = Me.TBPoids / (Me.TBTaille * Me.TBTaille) / 10000

avec 2 chiffres après la virgule dans la textbox TBIMC

J'ai essayé avec

Me.TBIMC = Format(Me.TBIMC.Value, "# ##0.00")

le résultat affiche toujours plus de décimale

Une suggestion ?

Merci d'avance pour votre aide.

Bonjour,

Pour l'indice de masse corporel > 70 kilo et 172 cm = 23, 66 ...

Le code serait ...

Me.TBIMC = CInt(Me.TBPoids) / (CDbl(Me.TBTaille) * CDbl(Me.TBTaille)) * 10000
Me.TBIMC = Round(CDbl(Me.TBIMC), 2)

ric

Merci ric pour l'aide

Dans quel cas utiliser ces fonction de conversion CInt et CDbl ?

Bonjour,

En fait > j'ai fait une erreur > car j'étais parti sur 1,72 mètre au lieu de 172 cm.

Le code serait donc pour kilo et cm ...

Me.TBIMC = CInt(Me.TBPoids) / (CInt(Me.TBTaille) * CInt(Me.TBTaille)) * 10000
Me.TBIMC = Round(CDbl(Me.TBIMC), 2)

Cint pour Integer > entier

CDbl pour Double > avec décimal

https://docs.microsoft.com/en-us/office/vba/language/concepts/getting-started/type-conversion-functi...

ric

Rechercher des sujets similaires à "affichage resultat calcul textbox"