Arondissement à 10e-2 pret (pratique pour les api monaitaire)

Soyez le premier à donner votre avis sur cette source.

Vue 4 773 fois - Téléchargée 205 fois

Description

Ce code sert a arrondire un nombre a 10e-2 pret. Il peut etre tres utile dans les api monnaitaire car meme si vous votre nombre ne possede pas de virgule ce module vous en mettra une et vous fera apparaitre les 2 zeros suivant. S'il votre nombre n'a qu'un nombre apres la virgule, il vous mettra un zero en derniere position

Source / Exemple :


Public Function Aron(entree)
test = entree
entree = Int(test)
sortie = entree
test = test - entree
test = Round(test, 2)
If test = "0" Then
    sortie = sortie & ",00"
    Aron = sortie
    Exit Function
End If
entree = Int(test * 10)
sortie = sortie & "," & entree
test = (test * 100) - (entree * 10)
If test = "0" Then
    sortie = sortie & "0"
    Else
    sortie = sortie & test
End If
Aron = sortie
End Function

Conclusion :


Voila, alors pour l'utiliser, vous le posé dans un module et dans votre code vous mettez genre

resultat = aron(text1.text)
'text1.text doit etre un nombre

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
11
Date d'inscription
lundi 17 décembre 2001
Statut
Membre
Dernière intervention
6 juin 2002

ah bon, et bah voila tu repond a ma question alors. Je cherchais a le faire depuis longtemps, mais je ne trouvais rien. Enfin, c beaucoup plus marrant de le faire comme ca. J'adore me prendre la tete. Mais vous Internaute, utiliser mon code.
@@@@@Telecharge ce code, c un ordre@@@@@
lol
Messages postés
62
Date d'inscription
lundi 24 décembre 2001
Statut
Membre
Dernière intervention
15 octobre 2007

Si je ne m'abuse la fonction format de VB le fait très bien :
ma_valeur_arrondie = format(ma_valeur_brute, "#0.00")

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.