Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: bikerboy am 20.09.07 - 17:51:36

Titel: Array Declaration
Beitrag von: bikerboy am 20.09.07 - 17:51:36

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

Titel: Re: Array Declaration
Beitrag von: Glombi am 20.09.07 - 18:33:31

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

Titel: Re: Array Declaration
Beitrag von: bikerboy am 21.09.07 - 10:04:45

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

Titel: Re: Array Declaration
Beitrag von: DerAndre am 21.09.07 - 10:13:21

Schau mal hier, vielleicht hilft das weiter.

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

Titel: Re: Array Declaration
Beitrag von: flaite am 21.09.07 - 10:13:45

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.

Titel: Re: Array Declaration
Beitrag von: DerAndre am 21.09.07 - 10:16:43

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