Aligner du texte dans une listbox

Bonjour à tous,

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

Code:

---

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

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:

---

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.

Sinon tu utilises une ListView pour avoir les colonnes

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

Merci pour vos reponses