Criando um array de strings

Module Estudos

  Sub Main()
    ' declara um array de strings
    ' Nota: o array contém 10 elementos, cujos índices
    ' vão de 0 à 9
    Dim cidades(9) As String

    ' define um valor para o terceiro elemento
    cidades(2) = "Goiânia"

    ' exibe o valor do 3º elemento
    Console.WriteLine(cidades(2))

    ' pausa o programa
    Console.WriteLine("Pressione qualquer tecla para fechar...")
    Console.ReadKey()
  End Sub

End Module