FormatText

Global Const LB_SETTABSTOPS = &H192
Global Const MaxTAB = N
' Numero massimo di Tab che vuoi inserire.

Global Dummy As Integer
Global TabStops(MaxTAB) As Long
TabStops(0) = V0
TabStops(1) = V1
........
TabStops(n) = Vn
'LstElenco e' una ListBox.

Dummy = SendMessage(LstElenco.hwnd, LB_SETTABSTOPS, n+1, TabStops(0))
'............

'V0,V1.....Vn, sono valori numerici che imposti a

'seconda di dove vuoi posizionare le colonne,

'(se non ricordo male sono espressi in Twips)

'La Declare della SendMessage

'la puoi prelevare dall' API Viewer.