Array mit Folderitems auslesen ?

[SChani]

Hallo, ich versuche ein Array das ich mit FolderItems gefüllt habe, 
wieder auszulesen.

Ich habe eigentlich gedacht ich kann es per:
  For i = 0 to UBound(array_mit_folderitems)

    // Mach was draus
  Next


auslesen. Aber ubound akzepiert anscheinend keine folderitems.

Ich bin mir noch nicht sicher ob ich auch die Files bzw die 
Folderitems(Dateireferenzen) im Array angelegt habe.

  Do
    If Obj.FolderItemAvailable then

      array_mit_folderitems() = obj.folderItem

      me.AddRow(array_mit_folderitems.DisplayName)

      //Me.AddRow(Obj.Text)
    End if
  Loop until Not obj.NextItem


Eigentlich sollte das funktionieren. Die geDragten Files werden in der 
Listbox angezeigt.

Besten Dank für Hilfe

Christian