Redim

用于更改运行时间时数组的最大下标。

格式
Redim [Preserve] 数组名(数组变量的最大下标)

参数

Preserve

保存数组前的值。可省略，如果省略，数组则被清除。

数组名

指定数组变量的名称。按通常的变量名惯例进行指定。必须事先声明数组。

数组变量的最大下标

指定数组变量的新的最大下标。请赋予与变量声明时相同数量的最大下标。使用下述格式。
(最大下标1, [最大下标2], [最大下标3])
由于下标从0开始，因此元素数为最大下标加上1。
在所有元素数不超过以下最大值的范围内指定各最大下标。

	String型以外	String型
本地变量	2,000	200
备份变量(Global Preserve)	4,000	400
全局变量和模块变量	100,000	10,000

说明
Redim用于变更运行时数组变量的最大下标。要保存前面的值时，指定Preserve。

不能对Byref指定的数组变量执行Redim。

频繁地执行Redim会降低程序的执行速度。尤其是针对备份变量执行Redim，建议将其控制在所需最低限度。

参阅
UBound

Redim使用示例

Integer i, numParts, a(0)

Print "Enter number of parts "
Input numParts

Redim a(numParts)

For i = 0 to UBound(a)
    a(i) = i
Next

'在最大下标上加上20
Redim Preserve a(numParts + 20)

'保持最初的下标
For i = 0 to UBound(a)
    Print a(i)
Next