dim a() 'dynamic

then redim when you need to increase the number of elements

redim a(number)


eg.

dim a() as string
redim a(1)

a(0) = "gadfly"
a(1) = "eldritch"

redim preserve a(2) 'use preserve to retain data in the array

a(2) = "popinjay"