Deklarera tvådimensionell array

[ns]

Har ett litet fånigt problem med arrayer.

 

Hur gör jag för att fylla en array med värden utan att behöva skriva rad för rad typ:

 

dim arrTest(3,3)

arrTest = ["asd", "sdf", "dfg"; "qwe", "wer", "ert"; "zxc", "xcv", "cvb"]

 

istället för:

arrTest(0,0) = "asd"

arrTest(1,0) = "sdf"

...

osv

 

/Niklas

 

[inlägget ändrat 2003-02-10 10:53:48 av ns]

[Carlos Cadalso]

Du kör 2 loopar in i varandra. Detta hjälper om du tar in värde från något annat plats ex. en fil eller en databas.

 

Dim arrTest(3,3)
Dim x
Dim y

For x=o to 2
 For y=0 to 2
 arrTest(x,y)="asd"
 Next y
Next x

 

 

 

[Christopher Bergren]

Det här är nog ett exempel på vad du söker:

 

dim a

a=array(array(1,2,3),array(1,2,3),array(1,2,3))