Discussion :

[Dan3007]

Bonjour à tous,

Voilà je remplis une listbox avec différents champs d'une BDD:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ListBox1.Items.Add(en.Current("num_reg_nat") & "  |  " & en.Current("nom") & "  |  " & prenoms(0))

Ce sont 3 string, de taille variables et donc les "colonnes" de ma listbox ne sont pas alignées.

J'ai essayé avec un string.format("{0,-n} {1,-n2} {2,-n3}",...) mais ca ne marche pas.

J'ai tenté de transformer mes string en tableaux de char mais alors je ne sais pas concaténer ma chaine.

J'ai aussi essayé d'utiliser une listview mais je n'y suis pas arrivé :s


Est-ce que quelqu'un aurait une solution ?
Merci d'avance pour vos réponses

[mustardpimp]

Tu parcours une première fois tous les champs "num_reg_nat" qui rentrent dans ta ListBox pour trouver celui qui a le plus de caractères.

Imaginons que la variable est max_num_reg_nat

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim v_num_reg_nat_temp = en.Current("num_reg_nat").Clone 'Tu crées une variable qui prendra le champ et les espaces si nécessaire
If v_num_reg_nat_temp.Length < max_num_reg_nat Then
            While v_num_reg_nat.Length < max_num_reg_nat
                v_num_reg_nat_temp += " "
            End While
End If

Bien sur tu fais le test pour nom et prénom.

Et pour l'affichage tu remplaces en.Current("num_reg_nat") par la variable créée v_num_reg_nat_temp.

[zoubidaman]

Sinon tu utilises une ListView pour avoir les colonnes

[Dan3007]

voilà j'ai insisté avec la listview et effectivement, cela marche nikel xD

Merci pour vos reponses