Arrayelement löschen

Forumthread: Arrayelement löschen
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Arrayelement löschen

12.09.2006 18:18:58

sommeralex

Hallo Profis
Ich hab ein Array mit Elementen.
Dim my_array() as String
Nun kann es sein, dass ich ein Element aus meinem Array löschen möchte. Meine Funktion "lösche" soll jedoch das um eins veringerte Array zurückgeben.
wie gehts das? oder muss ich alles in ein neues Array kopieren?
danke..

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Arrayelement löschen

12.09.2006 18:30:34

Josef
AW: Arrayelement löschen

12.09.2006 18:38:55

alex

AW: Arrayelement löschen

12.09.2006 18:30:34

Josef

Hallo Alex!
ich weis nicht ob dir das hilft.

Sub test()
Dim vArray(9) As Variant, vTest As Variant
Dim intIndex As Integer

For intIndex = 0 To 9
  vArray(intIndex) = intIndex + 1
Next

vTest = vArray

MsgBox "Anzahl Elemente:= " & UBound(vTest) + 1 & vbLf & vbLf & _
  "Wert des sechsten Elementes:= " & vTest(5)

vTest = Filter(vArray, 6, False) 'den Eintrag "6" löschen

MsgBox "Anzahl Elemente:= " & UBound(vTest) + 1 & vbLf & vbLf & _
  "Wert des sechsten Elementes:= " & vTest(5)

End Sub

Gruß Sepp