ReDim nAry(1 To 4） 表示下标是 从1到4 ReDim nAry(1 To 3, 1 To 12) 表示1维下标是1到3， 二维 从1到12 即 nAry(1,1) 到nAry(3,12)
REDIM ReDim 为数组变量重新分配存储空间。可选项修饰符 Preserve 当仅更改最后一个维度的大小时，用来保留现有数组中的数据。 使用 ReDim 语句来更改某个已声明数组的一个或多个维度的大小。如果有一个较大的数组，并且您不再需要它的某些元素，ReDim 可通过减小数组大小来释放内存。另一方面，如果代码确定某个数组需要更多元素，ReDim 也可以添加它们。 ReDim 语句仅适用于数组。它在标量（只包含单一值的变量）、集合或结构上是无效的。 仅可以在过程级使用 ReDim。这意味着，变量的“声明上下文”必须是过程，而不能是源文件、命名空间、接口、类、结构、模块或块。 例如： 有一个Byte数组A，如果我们知道这个数组上限最大只能是4，就用Dim Dim A As Byte(4) 但如果我们不能事先确定它的大小，或者需要在运行时改变它的大小就要用动态数组 Dim A As Byte() ReDim A(4)'这样改变大小时会清空原来的数据 ReDim Preserve A(4)'这样改变大小时会保留原来的数据
ReDim nAry(1 To 3, 1 To 12) 表示1维下标是1到3， 二维 从1到12
即 nAry(1,1) 到nAry(3,12)
ReDim 为数组变量重新分配存储空间。可选项修饰符 Preserve 当仅更改最后一个维度的大小时，用来保留现有数组中的数据。
使用 ReDim 语句来更改某个已声明数组的一个或多个维度的大小。如果有一个较大的数组，并且您不再需要它的某些元素，ReDim 可通过减小数组大小来释放内存。另一方面，如果代码确定某个数组需要更多元素，ReDim 也可以添加它们。
ReDim 语句仅适用于数组。它在标量（只包含单一值的变量）、集合或结构上是无效的。
仅可以在过程级使用 ReDim。这意味着，变量的“声明上下文”必须是过程，而不能是源文件、命名空间、接口、类、结构、模块或块。
例如：
有一个Byte数组A，如果我们知道这个数组上限最大只能是4，就用Dim
Dim A As Byte(4)
但如果我们不能事先确定它的大小，或者需要在运行时改变它的大小就要用动态数组
Dim A As Byte()
ReDim A(4)'这样改变大小时会清空原来的数据
ReDim Preserve A(4)'这样改变大小时会保留原来的数据
http://tech.163.com/07/0821/13/3ME3MJU2000929IL.html