questions sur formatage d'un Print

Bonjour,

Je fait des print dans un fichier txt en output.

Code:

---

1 2 3 4 5

MONTANTAVECVIRGULE = "0000000000000000" & rst("EC_Montant") MONTANTSANSVIRGULE = Replace(CStr(MONTANTAVECVIRGULE), ",", "") MONTANTSANSVIRGULE = LTrim$(Right$(MONTANTSANSVIRGULE, 15)) Print #1, MONTANTSANSVIRGULE;

---

J'ai 2 questions : y-at'il simple (ou propre) comme codification pour faire ce que je fais.
Ici une variable Montant qui doit être sur 15 caractères sans virgule cadrée à droite


et aussi pour cette expression :

Code:

---

Print #1, " "; ' champ libre sur 13 caractères

---

Je dois faire la même chose mais pour 200 espaces qui se suivent :?
Y'a t'il + simple que de m'amuser à taper (et à compter) 200 espaces ??

Merci

1) regarde la fonction Format

2) regarde la fonction Space

Merci

j'ai trouvé grâce à toi :

Code:

---

1 2	Print #1, Space(199); Format(15.47, "0000.##") 'affichera 0015.47

---

sinon j'ai trouvé aussi ceci :

Code:

---

1 2 3 4

Dim Nom As String * 5 Nom = "1234567890O234567890V234567890T234567890Q234567890" Print #1, Nom ' Affichera que 5 caractères

---

;)

Attention toutefois aux strings de longueur fixe, car justement, elles ont une longueur fixe

et si dans ton exemple, tu initialises Nom="123", la string Nom = "123__" (les _ pour te montrer les espaces contenus dans la chaine)

Citation:

---

ThierryAIM
1) regarde la fonction Format

---

Une question à ThierryAIM

C'est vrai la fonction format est pratique ,mais est-ce qu'elle ne dépend pas des paramètres de Windows?
C'est pourquoi parfois je préfère alors utiliser les fonctions Lset ou Rset pour cadrer à droite où à gauche et ne pas dépendre des paramètres de Windows.
Quel est ton avis?

A+