<%
Option Explicit
Dim i,arrVar(4,1)
arrVar(0,0) = 1
arrVar(0,1) = 1.1
arrVar(1,0) = 2
arrVar(1,1) = 2.2
arrVar(2,0) = 3
arrVar(2,1) = 3.3
arrVar(3,0) = 4
arrVar(3,1) = 4.4
arrVar(4,0) = 5
arrVar(4,1) = 5.5
For i = LBound(arrVar) To UBound(arrVar)
Response.write arrVar(i,0)&" - "&arrVar(i,1)&"<br>"
Next
%>