Array Declaration

[bikerboy]

Hi, habe ein bisschen mit der Suche gestöbert und was gefunden , das interessant für mich wäre, wenn es denn funktioniert.

Ich möchte einen zweidimensionalen Array aufbauen und habe versuchtihn folgendermassen zu deklarieren.

Code

Dim sortList(count,1) as String

-> count ist ein Integerwert

Fehlermeldung ist dann : Illegal array bound for : sortList , aber warum

[Glombi]

Das geht nur, falls count vorher als Konstante deklariert wurde.

Wenn es dynamisch zur Laufzeit gehen soll, dann musst Du ein
dynamisches Array verwenden und dann mit
Redim...
die Grenzen bestimmen.

Um vorhandene Array-Werte zu behalten, musst man
Redim Preserve...
verwenden.

Andreas

[bikerboy]

das mit dem Redim wirft aber leider die selbe meldung nur halt eine zeile später, echt ärgerlich.

[DerAndre]

Schau mal hier, vielleicht hilft das weiter.

http://atnotes.de/index.php?topic=19574.0

[flaite]

Kann man nicht sowas machen?

Code

Dim arrOuter() As Variant 
Dim arrInner() as String

Redim Preserve arrInner(2) 
arrInner(0) = "Kölner Dom"
arrInner(1) = "Ulmer Münster"
arrInner(2) = "Berliner Dom"

Redim preserve arrOuter(0)
arrOuter(0) = arrInner

Redim arrInner(1)
arrInner(0) = "Golden Gate Bridge"
arrInner(1) = "Pont Du Gard"

Redim Preserve arrOuter(1) 
arrOuter(1) = arrInner

Habs nicht ausprobiert. Könnte aber klappen.

[DerAndre]

Hier nochmal die Hilfe:

WICHTIG: Dim array(0 to 9, 0 to 9)

In a two-dimensional array whose elements are the names of the ten most populous cities in each state, the first subscript identifies the state, and the second subscript identifies the city:
Dim statesAnd10Cities(1 to 50, 1 to 10) As String
statesAnd10Cities(1,1) = "Alabama, Birmingham"
statesAnd10Cities(1,2) = "Alabama, Mobile"
' ...
statesAnd10Cities(2,1) = "Alaska, Anchorage"
statesAnd10Cities(2,2) = "Alaska, Fairbanks"
' and so on.
Print statesAnd10Cities(1,2)
' Output: Alabama, Mobile