Invertendo a ordem dos elementos de um array

'Este exemplo mostra como inverter (reverter) a
'ordem dos elementos de um array

Module Module1
  Sub Main()
    ' cria um array de inteiros
    Dim valores() As Integer = {1, 2, 3, 4, 5}

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

    'inverte a ordem
    Array.Reverse(valores)

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

    Console.ReadKey()
  End Sub
End Module