动态二维数组只能redim高维。比如
dim a () as string
用这样的方法重新定义
redim a(1 to 2,1 to Newbound) as string '这样的结果是扩大了数组的容量,但是冲掉了存在数据
redim preserve a(1 to 2,1 to Newbound) as string
preserve帮我我们在扩大数组容量的同时,保存已有数据
例子
dim a() as string
for i=1 to 10
redim preserve a(1 to 2,1 to i) as string
preserve(1,i)=i
preserve(2,i)=i*10
next i