J’ai cherché mais pas trouvé la fonction pour formater un nombre (elle existe peut être).
J’ai bricolé un bidule, je sais c’est un peu rustique mais en apparence ça marche.
Si vous avez d’autres solutions je suis preneur.
Pierre
PS : 3 lignes nécessaires, les autres c’est pour les essais (jusqu’à 10 décimales ça a l’air bon).
Code : Tout sélectionner
EnableExplicit
Global Nbs.f
; 2 lignes infos formatage ***
Global dc.u =3; <==== Nombre de décimales à changer nécessaire
Global n2.f=0.00000001 ; sinon problèmes avec les entiers nécessaire
;************************
Define a.i
For a=1 To 14
nbs=Random(10000, 0)/9
Debug "Nombre : " +nbs
; formatage du nombre nbs
Debug "Formaté :" + StringField(StrF(nbs),1,".")+"."+Left( StringField(StrF(nbs)+n2,2,"."),dc); nécessaire
; fin ***************
Debug "************"
Next