Arrondir des nombres à un certain nombre de décimales

Soyez le premier à donner votre avis sur cette source.

Snippet vu 17 637 fois - Téléchargée 47 fois

Commenter

Contenu du snippet

Utilisez la fonction format (mais mettez pas c: en argument ;)

Source / Exemple : 


dim lenombre1
dim lenombre2
dim leresultat

lenombre1 = 77
lenombre2 = 78
leresultat = lenombre1 / lenombre2

leresultat = format (leresultat,"#0,000")

text1.text = leresultat

Conclusion :


Ici j'ai arrondi au millième près mais vous avez juste à changer le nombre de décimales dans format pour ajuster ça

A voir également

Ajouter un commentaire Commentaires
mprog67 Messages postés 28 Date d'inscription mercredi 24 mars 2010 Statut Membre Dernière intervention 14 mai 2012
14 mai 2012 à 20:29
Bonsoir à tous, mois j'utilise cette fonction pour arrondir un nombre

Public Function RoundUp(Nb As Double) As Integer
' On déclare une variable qui contiendra la valeur décimale
Dim Décimale As Integer
' Extraire la décimale
Décimale = Nb * 100 - Int(Nb) * 100
If Décimale > 0 Then Nb = Int(Nb) + 1
RoundUp = Nb

End Function
rrr_zidane_8 Messages postés 2 Date d'inscription mardi 19 avril 2005 Statut Membre Dernière intervention 12 octobre 2006
30 nov. 2006 à 19:29
MERCI BEAUCOUP POUR VOTRE EFFORT
ikariShinji Messages postés 18 Date d'inscription mercredi 13 mars 2002 Statut Membre Dernière intervention 2 juin 2005
24 sept. 2003 à 17:58
"Il y a beaucoup plus simple : utiliser le deuxième argument de la fonction Round, qui précise le nombre de décimales."

Bien sûr Xentor, mais la fonction Format permet en plus une mise en forme en séparant les milliers par un espace. Par exemple :
Format(50350.489, "###,###,###.00") donne : "50 350,49".
Xentor
15 nov. 2001 à 12:02
Au fait : je ne vois pas l'utilité de toutes ces lignes superflues.... En fait, ton code se résume à ceci :
text1.text = format (77 / 78,"#0,000")
gosney
15 nov. 2001 à 10:19
Pis format renvoie une string.. ca serait plus propre un cdbl(format(...)) ;P
(Pour pinailler quoi.. et assurer le passage de ta fonction a vb.net ;)
S'inscrire maintenant

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.

Du même auteur (cs_Supo)