a=10
dim arr1()
ReDim arr1(a,1)
a = 2
dim arr()
ReDim arr(a)
arr(1)=2
arr(2)=3
ReDim preserve arr(10)
arr(3)=4
For each i in arr
print arr(i)
Next
a=10
dim arr1()
ReDim arr1(a,1)
a = 2
dim arr()
ReDim arr(a)
arr(1)=2
arr(2)=3
ReDim preserve arr(10)
arr(3)=4
For each i in arr
print arr(i)
Next