Criando e inicializando um array de inteiros

Module Estudos

  Sub Main()
    ' cria um array de inteiros
    Dim valores() As Integer = {32, 13, 65, 34, 20}

    ' exibe os valores do array
    For Each valor As Integer In valores
      Console.WriteLine(valor)
    Next

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

End Module