Problem med 2D array - Type Mismatch

Har denne kode der gerne skulle fylde mit array op så flot:

i = 0
      Do While Not RS.eof
        'Response.Write(RS("country_ISO")&" "&RS("landtotal"))
       
        Set RS1 = RunSqlHS("STP_HS_GetCountryGrowth '2','"&Session("ISOdate")&"','"&Session("ISOtime")&"','"&Trim(RS("country_ISO"))&"'")
       
        'Response.Write(" "&RS1("landtotal") & " " & Left(RS("landtotal")/RS1("landtotal")*100,4) & "%<br>")
       
        Step1 = Left(RS("landtotal")/RS1("landtotal")*100,4)
        Step2 = Step1-100
        arrLandVaekst(i,0) = RS("country_ISO")
        arrLandVaekst(i,1) = Step2
       
        Response.Write(arrLandVaekst(i,1)& " "&arrLandVaekst(i,0) & " <br>")
       
        i = i + 1
      RS.movenext
      Loop

Meeeeen, det giver denne fejl:

Microsoft VBScript runtime  error '800a000d'

Type mismatch: 'arrLandVaekst'

Simpelt spørgsmål - hvorfor?