Public Class Tester Public Shared Sub Main Dim arrayReverse() As String = {"A", "B", "C", "D", "E"} For Each fruit As String In arrayReverse Console.WriteLine(fruit) Next fruit Array.Reverse(arrayReverse) For Each fruit As String In arrayReverse Console.WriteLine(fruit) Next fruit End Sub End Class
A B C D E E D C B A