se declara el arregloDim 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