se declara el arreglo- Dim arreglo(19) As String 
-   
arreglo = nombre del arreglo 
(19) = numero de elementos que contiene el arreglo
String = Tipo de dato 
llenar el arregloen este caso llenare el arreglo de ceros
- For x = 0 to x = 18 
-      arreglo(x) = "0" 
- next x 
-   
otra forma de hacerlo
- arreglo(0) = "hola" 
- arreglo(1) = " : p" 
- arreglo(2) = "aja" 
-   
-   
etc...
espero aver sido explicita, saludos 
