allineare testo in una listbox

[gaullo]

ciao raga...sto cercando di far visualizzare un elenco di info prese da un query...
Mi serve che però sia un elenco ordinato

ho inizialmente pensato ad un datagrid...che però non ho mai usato...
a differenza delle listbox che conosco bene.
Ma non del tutto. Non riuscendo ad attenere info sul datagrid (cliccando una riga devo poter sapere qual'è e leggere i dati per altre operazioni) ho pensato di ordinare il listbox in maniera "fai da te", ecco il cod

Do While sede.Recordset.EOF = False
spaz1 = 21 - Len(sede.Recordset("regione"))
spaz2 = 15 - Len(sede.Recordset("città"))
spaz3 = 21 - Len(sede.Recordset("indirizzo"))
List1.AddItem (sede.Recordset("regione") & String(spaz1, " ") & " | " & sede.Recordset("città") & String(spaz2, " ") & " | " & sede.Recordset("indirizzo") & String(spaz3, " ") & " | " &
List1.ItemData(List1.NewIndex) = sede.Recordset("idsede")
sede.Recordset.MoveNext
Loop

purtroppo i caratteri "occupano" spazio differente (l i m ) e l'ordine va a put..
Se qualcuno risce a darmi info sul datagrid sono a posto...altrimenti come posso ordinare la listbox

[gaullo]

Strano che nessuno abbia risposto!!!
non era poi così difficile....

per chi potesse essere interessato, mi è bastato usare come font il currier new (non proporzionale) e mi si è risolto tutto