Hallo mezzomix,
So wie Du das machen willst geht es leider nicht.
Dim xgeb(0) As string heisst dass die Anzahl der Werte 0 ist.
Du hast 2 Möglichkeiten:
Dim xgeb(100) As string
und
For i=0 To Anzahl
xgeb(i)="A"
Next
Oder mit einem ArrayList Control den Du auch 'xgeb' nennen kannst.
Und dann mit:
xgeb.Clear ' xgeb lehren falls nötig
For i=0 To Anzahl
xgeb.Add("A")
Next
die ArrayList füllen.
Ich würde Dir die zweite Lösung bevorzugen. Der ArrayList Control hat Alle Möglichkeiten zum Verwalten. Item, Add, Insert, Remove, RemoveAt usw.
Beste Grüsse.
|