Hola
Create una matriz pública y dimensionala:
Si quieres agregar hazlo así:
Frutas(0) = "Manzana"
Frutas(1) = "Pera"
Si ves que vas a emplear mas de 10 indices (del ejemplo), crea una variable temporal, pasale los datos de la original, redimensiona la original, y vuelve a poner los de la temporal en la original, y así ya puedes agregar lo que quieras
Consejo: Create una variable publica de la dimensión máxima, y cada vez que redimensiones pasale el valor de la nueva dimensión .
Dim TotalFrutas = 10 As Int
Saludos