Bonjour,

Je lis une table SQL pour récupérer des données. Ensuite je les formatte.
Ici j'ai besoin d'avoir le montant sur 15 caractères et sans le symbole 'virgule'

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
MONTANTAVECVIRGULE = "0000000000000000" & rst("EC_Montant")
  MONTANTSANSVIRGULE = Replace(CStr(MONTANTAVECVIRGULE), ",", "")
Si le montant est : 12340,56 j'obtiens 000000001234056 exactement ce que je veux

mais si le montant est 12340,00 j'obtiens 000000000012340

soit un décalage car il ne me mets pas les 00 qui sont après la virgule.


Sauriez-vous comment je peux les avoir ?

Merci

P.S. : dés le rst("EC_Montant") le montant est 12340. Or sur ma table, il y a bien 12340,56. C'est donc dés la lecture de mon champs que VB6 me supprime la décimale et les deux zéros qui suivent.