Contenu récent par tulipansell

erreur dans : - n'affiche pas le chiffre 1 et 100 et 1000 - ne reconnais pas le zéro après la décimale exp: 600.09 DA affiche que : six cent dinars algériens et neuf centimes - de 91 jusqu'à 95 aussi de 71 jusqu'à -76 au lieu d'afficher soixante onze affiche : soixante un je vous...

erreure dans : - 1 et 1000 DA n'affiche pas - ne reconnais pas la décimale : 01 CTS - de 71 DA à 76 DA et 81 DA - de 91 DA à 96 DA voici la fonction : Function SpellNumber(ByVal MyNumber) Dim Dollars, Cents, Temp Dim DecimalPlace, Count ReDim Place(9) As String Place(2) = " Mille " Place(3) = "...