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

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

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.