qtp重定义数组大小

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