Visual Basic 6 - Listbox : cancellare voci vuote

Ciao Raga!
studiando il Visual Basic 6 a scuola, sono incappato in un problema con le ListBox:
ho creato una listbox contenente:
VETTORE

ELEMENTOVETTORE1
ELEMENTOVETTORE2
ELEMENTOVETTORE3
ELEMENTOVETTORE4

con 2 spazi vuoti di default scritti subito dopo per permettere alla listbox di aggiungerci altra roba, ma come faccio a dirgli: (velo scrivo in pseudocodifica, perchè appunto non trovo il codice adatto, ho gia provato list1.list(index) e list1.text e il sendkeys down per "selezionare a tastiera" la lista!)


SE TESTOLISTBOX="" allora
LISTBOXREMOVEITEM=LISTAVUOTA
FINE SE

ciclando con un for l'index (i) della listbox.. ma mi da errore! Help!
(ho provato pure con il passaggio dell'indice byval e byref e niente)

questo è il codice scusate:

Private Sub Command1_Click()
For i = 0 To List1.ListCount
If List1.List(i) = "" Then
List1.RemoveItem (i) 'qui segnala l'errore
End If
Next i
End Sub
Private Sub Form_Load()
List1.AddItem ("")
For i = 1 To 10
List1.AddItem (i)
Next i
List1.AddItem ("")
List1.AddItem ("")
End Sub

Da L'Errore:
"Chiamata di routine o argomento non valido"
alla chiamata di RemoveItem della listbox.

Usa un ciclo che parta dall'ultimo e arrivi al primo.

Ricorda che l'ultimo e' in ListCount-1