动态数组指在声明数组时未给出数组大小（省略括号中的下标），当要使用它时，随时用ReDim语句重新指出数组的大小。其优点是可以根据用户需要，有效地利用存储空间。动态数组的定义方法为：
Dim 数组名() [As 数据类型]     '声明一个尚未定义大小的数组，也可声明其数据类型
未定义大小的数组是不能使用的，可用ReDim语句重新定义，给出数组大小，格式如下：
ReDim [Preserve] 数组名(表达式)
可用ReDim多次重新定义数组大小。但若ReDim语句中不加Preserve关键字的话，重新定义数组大小后，数组之前存放的数据就会被清除掉。如果要保留以前的数据，就要使用Preserve关键字。
例如：

Dim arr ( ) As Integer        '定义动态数组arr
Dim n As Integer=10                
ReDim arr(n)                  '重定义数组arr，将其大小定义为11
For i=0 To 10  
arr(i)=i 
Next  
ReDim Preserve arr(20)        '再次定义数组arr，将其大小定义为21，保留之
'前arr(0)~arr(10)的值

【责任编辑：老杨 Tel：(010)68576606-8005】