Bonjour,

Mon problème est très simple, je voudrais créer une chaine de caractère en fonction d'un calcul (lors du programme)
Par exemple suite au calcul j'obtiens par exemple 5
Donc créer une chaine de 5 " "
Pourquoi me direz vous ?
J'ai une instruction du type suivant pour remplir une zone de liste
et je voudrais que les espaces soit bien délimité

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
 
lsthist.Items.Add(Format(Dat, "dd/MM/yyyy") & "     " & solde & "     " & _
Op & "     " & mont & "  =   " & res & "     " & Jt)
solde est un nombre décimal
de même que mont
et res
La ligne que j'obtiens est en fait du type

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
12/12/2007     5000   +   500.50  =  5500.50   ajout sur le compte
15/12/2007     5500   -   10.50  =  5489.50   retrait sur le compte
Je voudrais que toutes les valeurs soient bien alignée
Pour cela je par du principe que toute mes valeurs chiffrées on une longueur maximale de 11 caractères

et donc je devrais pour chaque chiffre calculer le nombre d'espace à mettre pour que cela s'aligne avec la ligne suivante

Je devrais utiliser une instruction du type string(cal," ") Mais le problème c'est que je me rapelle plus de l'instruction

pour avoir alors le bon alignement j'aurais une ligne du genre

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
'
'
'
 
 
sepA=str(11- string-length(Solde)," ") & "   "
sepB=str(11-string-length(mont)," ") & "     "
sepC=str(11-string-length(res),"  ")& "    " 
 
lsthist.Items.Add(Format(Dat, "dd/MM/yyyy") & "   " & solde & sepA & Op _
& sepB & mont & sepC & " =   " & res & sepD & & Jt)
J'obtiendrais alors un résultat du type
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
12/12/2007     5000   +   500.50  =  5500.50   ajout sur le compte
15/12/2007     5500   -    10.50  =  5489.50   retrait sur le compte
En fait à ce moment tout est parfaitement aligné

Quelqu'un pourrait-il m'aider