Empêcher l'arrondissement automatique [Résolu]

cs_Dark Revan 23 Messages postés mercredi 19 janvier 2005Date d'inscription 15 avril 2006 Dernière intervention - 3 avril 2005 à 20:52 - Dernière réponse : Gobillot 3140 Messages postés vendredi 14 mai 2004Date d'inscription 31 mars 2015 Dernière intervention
- 3 avril 2005 à 21:14
Je n'ai jamais eu ce problème mais présentement, je l'ai. J'ai une équation mais celle-ci, s'arrondit automatiquement...

Voici l'équation : TotalControl2 = ((((((ballonfin + marsfinfinale) + fillerfin) + densbrutfinale) + densmaxfinale) + extractfin) + granulefin)

ballonfin= -0,001
marsfinfinale = 447
fillerfin = 3270,8
densbrutfinale = 6260
densmaxfinale = 11230,2
extractfin = 6146,8
granulefin = 6281,3

TotalControl2 doit donner : 33636,099 (Calculer avec une calculatrice pour voir)
Malheureusement, VB me retourne 33626,1 alors que la variable est bien une Single et que je ne fais aucun arrondissement...

Les parenthèses ne sont pas nécessaires, c'était un test que je faisais.

Savez-vous pourquoi ça me donne ce résultat?
Afficher la suite 

1 réponse

Gobillot 3140 Messages postés vendredi 14 mai 2004Date d'inscription 31 mars 2015 Dernière intervention - 3 avril 2005 à 21:14
+3
Utile
"33636,099" plus de 7 chiffres significatifs pour un Single c'est trop.
met tout en Double et pas seulement le résultat sinon surprise !
Dim R As Double
R = CSng(11230.2) + 0.001
MsgBox R

Daniel
Cette réponse vous a-t-elle aidé ?  

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.