Redimensionar Array

[bacalao]

Hola a todos Necesito incluir en un array desde 1 valor hasta mil, pero el detalle es que no se si voy a tener los mil campos o menos guardados en el hay alguna manera de que el array se pueda redimensionar cada vez que se agrega un nuevo campo al arreglo. Por Ejemplo:

Tengo un Formulario con 1000 numeros y al lado u cuadro de texto se veria asi:

000 100
001 200
... ...
999 6000

Entonces yo deseo meter en dos arreglos uno para los numeros y el otro para el monto, pero el detalle es que el usuario puede meter tanto 5 numeros como 500 o hasta los mil numeros con su respectivo monto claro. Entonces mi pregunta es como puedo redimensionar el arreglo para no ocupar tanto espacio en memoria y utilzar lo que necesito.?

Gracias de antemano.

Atte. Bacalao :)

[carcellan]

Podemos declarar arrays con tamaño dinámico, es decir, variable en tiempo de ejecución. Para ello, debemos no especificar el tamaño del array en su declaración, dejando los paréntesis vacíos:

Dim MiArray()

Una vez declarado el array, disponemos de la palabra clave ReDim para cambiar el tamaño cuando sea necesario:

ReDim MiArray(15)
....
....
ReDim MiArray(25)


El contenido de un array se pierde al cambiar su tamaño. Para evitar esto podemos utilizar la instrucción

Preserve