anzichè con gli spazi, prova con la costante vbTab, ovvero:

stringa = "[1]" & vbTab & "parola"

se questo non è sufficiente, allora devi utilizzare la funzione API SendMessage per impostare i TABSTOPS della ListBox, in modo che siano abbastanza larghi da dare l'impressione di colonne.

Boolean