有时我们在使用数组时却无法估计数组的大小，于是很容易想到动态数组，即在使用的过程中动态地改变数组的大小。这在VB中很容易实现，下面就以具体的例子来讲解：
在VB中定义动态数组通常分两步：
（1）在窗体层或标准模块中用Dim、Private或Public声明一个没有下标的数组(括号不能省略)，
（2）在过程中用ReDim语句定义带下标的数组
ReDim语句的作用，是重新指出数组的大小。它是在程序执行到ReDim语句时才分配存储空间。
格式：ReDim(数组名)(下标)[As(类型)]
功能：改变动态数组的大小和存储空间。
说明：
（1）下标可以是常量，也可以是具有确定值的变量。
（2）语句中各参量的含义与用Dim定义数组的语句相同。
（3）ReDim语句只能用于动态数组，它可以改变每一维的大小，但不能改变维数。
（4）当程序编译时，ReDim语句中的所有数组均被说明为动态数组。在程序运行中，当执行到ReDim语句时，就把新的上下界重新分配给数组，数组元素的值将被初始化，所有的数值元素的值被置为0，字符串元素被置为空字符串。
（5）ReDim语句可以同Dim语句一样定义数组。在同一程序中，ReDim语句还可以多次使用。在用：ReDim语句重新定义数组之前，可以使用：Erase语句将原来的数组删除
实例：
Dimaa()AsLong'定义一个动态数组
Redimaa(10)'调整动态数组的大小
dim i as integer
for i=1 to 10
aa(i) = i
next
Redim aa(5) '又一次调整大小
......其它的操作