Como passar um array de inteiros para um método que exibirá seus valores

'Este exemplo mostra como passar um array de
'inteiros para um método. Observe que estamos usando
'ByVal no parâmetro do método. Isso evita que o array
'original seja modificado

Module Module1
  Sub Main()
    Dim valores As Integer() = New Integer() _
      {5, 12, 3, 54, 10}

    'passa o array para o método ExibirArray
    ExibirArray(valores)

    Console.ReadKey()
  End Sub

  Sub ExibirArray(ByVal array As Integer())
    For i As Integer = 0 To array.GetUpperBound(0)
      Console.WriteLine(array(i))
    Next
  End Sub
End Module