Zero apres virgule [Résolu]

Question

Posez votre question Signaler

Zero apres virgule [Résolu]

cs_jolicoeur79 63 Messages postés samedi 2 octobre 2004Date d'inscription 1 avril 2018 Dernière intervention - 12 janv. 2007 à 03:37 - Dernière réponse : cs_jolicoeur79 63 Messages postés samedi 2 octobre 2004Date d'inscription 1 avril 2018 Dernière intervention

- 14 janv. 2007 à 01:10

Visual Basic 6 Posez votre question Signaler

salut les mecs
j'ai un petit probleme :
j'ai creer un table access avec un champs monetaire et un interface vb lorsque je veux aficher le montant saisie dans le champs access dans un textbox vb il ne me donne pas les zero qui ont apres le virgule o le point ( 20 au lieu 20.00 et 20.1 au lieu 20.10 ).
et merci de votre comprehension et votre aide a+

Afficher la suite

Votre réponse

Répondre au sujet

7 réponses

Signaler Commenter la réponse de cs_Exploreur

cs_Exploreur 4824 Messages postés lundi 11 novembre 2002Date d'inscription 15 novembre 2016 Dernière intervention - 12 janv. 2007 à 08:03

0

Merci

Salut,
Peut-être cela aussi...Pas sur...
Dim RecupValeur as Long
Dim Arrondi as String
Arrondi = Round(Text1.Text ,2)
RecupValeur = Val(Text1.Text)

A+
Exploreur

Signaler Commenter la réponse de drikce06

drikce06 2247 Messages postés lundi 29 mai 2006Date d'inscription 29 mai 2008 Dernière intervention - 12 janv. 2007 à 08:10

0

Merci

Salut, le probleme avec round c'est que :

Dim valeur as double
valeur = 7.99
round(valeur,2)=8 et non 8,00
donc il faut passer par la fonction Format!

Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

Signaler Commenter la réponse de cs_Exploreur

cs_Exploreur 4824 Messages postés lundi 11 novembre 2002Date d'inscription 15 novembre 2016 Dernière intervention - 12 janv. 2007 à 08:15

0

Merci

Ok Drickce06...alors j'ai rien dit, il fait juste alors le Val ?
A+
Exploreur

Signaler Commenter la réponse de drikce06

drikce06 2247 Messages postés lundi 29 mai 2006Date d'inscription 29 mai 2008 Dernière intervention - 12 janv. 2007 à 08:23

0

Merci

Autant pour moi ça donne bien 7.99 mais je me suis planté dans l'exemple c'est 7.999 qui donne 8, en revanche ce meme round avec comme valeur 20.1 donnera 20.1 et non 20.10!

Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

Signaler Commenter la réponse de drikce06

drikce06 2247 Messages postés lundi 29 mai 2006Date d'inscription 29 mai 2008 Dernière intervention - 12 janv. 2007 à 08:37

0

Merci

valeur = CStr(7.1)
valeur = Format(valeur, "#.00")
MsgBox valeur

Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

Signaler Commenter la réponse de cs_jolicoeur79

cs_jolicoeur79 63 Messages postés samedi 2 octobre 2004Date d'inscription 1 avril 2018 Dernière intervention - 14 janv. 2007 à 01:10

0

Merci

merci jmo,exploreur,drikce pour vous aides j'ai essayer avec "formatnumber " il ca marche bien merci b+

Votre réponse

Répondre au sujet

Posez votre question

Accepted Answer

3

Merci

Bonjour,

var1 = "20"
var2 = "20,1"
MsgBox FormatNumber(var1,2) &vbCr& FormatNumber(var2,2) 'retourne 20,00 et 20,10

var3 = "12,514546"
MsgBox Round(var3,3) 'retourne 12,515
MsgBox CInt(var3) 'retourne 13
MsgBox Fix(var3) 'retourne 12
MsgBox FormatNumber(var3,3) 'retourne 12,515

jean-marc

Merci cs_JMO 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 98 internautes ce mois-ci

Zero apres virgule [Résolu]

Votre réponse

Votre réponse

Votre réponse

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Vous n'êtes pas encore membre ?

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