BIZARRE PROBLÈMERésolu

Question

Dim



 int 

As



Integer
 = 3


Dim
 chiffre 

As



Double
 = 914.4


Dim
 total 

As



Double

total = chiffre - (int * 304.8)

Quand tu regardes la valeur de total il ne donne pas 0 je comprends pas lol.

Quelle qu'un a une idée du pourquoi???????????

J'ai testé dans vba Excel et ça donne le même résultat.


MERCI !!!

econs · Accepted Answer

Salut,

C'est à cause du type Double, et de la multiplication de l'Integer par le double (problème connu de cast)
Avec des Long, tout va bien
Et au passage, évite d'appeler ta variable int. Int est un mot réservé dans beaucoup de langages, y compris VB6





Dim monInt As Long

Dim total As Long
Dim chiffre As Long
chiffre = 914.4

monInt = 3
total = chiffre - (monInt * 304.8)
MsgBox total








Manu


--------------------------------------------------------------------------------------------
Avant de poster un message, n'oubliez pas de consulter le reglement.

cs_Jack · Answer

Salut
Le must étant quand même de convertir les variables pour qu'elles soient toutes de même type, on ne multiplie pas des choux et des carottes :
Total = Chiffre - (CDbl(Int) * 304.8)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accroit quand on

Gobillot · Answer

le seul moyen possible:

Total = Chiffre - CDec(Int * 304.8)






Daniel

BIZARRE PROBLÈME

3 réponses

Votre réponse