Soustraction en VB6

Résolu
Signaler
Messages postés
270
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
4 avril 2019
-
Messages postés
270
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
4 avril 2019
-
Bonsoir,

Question bête mais bon.
J'ai une variable de type double.
Je fais ce calcul --->>> restdu = 141,02 - 141,00 mais j'ai toujour zero dans restdu alors qu'il devrait me mettre
0,02 pourquoi ?

Merci

tolt

4 réponses

Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
27
Cdec également, bien sûr....

Mais l'idéalm est de toujours travailler avec le point comme séparateur décimal, y ciompris si on permet la saisie avec une virgule. Rien n'est plus simple que d'utiliser systématiquement un Replace puis de travailler avec la transformation et Val


Car :


  Dim toto As Single
  toto = Val("141.02") - Val("141.00")
  MsgBox toto

sera toujours bon


 
Messages postés
7668
Date d'inscription
samedi 5 novembre 2005
Statut
Membre
Dernière intervention
22 août 2014
27
Bonjour

Parce que si 'lon utilise la virgule comme séparateur décimal, on utilise Ccur ...
essaye donc
Msgbox ccur("141,02") - ccur("141,00")
Messages postés
270
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
4 avril 2019

Ou Cdec non ???? Car je viens de le faire avec Cdec etça marche.
Merci de me répondre.

tolt
Messages postés
270
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
4 avril 2019

OK Merci du conseil et bonne soirée.Vraiment super ce site.
Félicitation à tous d'un petit retraité qui n'est pas informaticien mais qui s'amuse bien en VB6.
Bien Amicalement

tolt