Array Reverse and Sort : Array Sort Reverse « Collections « VB.Net Tutorial

1. VB.Net Tutorial
2. Collections
3. Array Sort Reverse

Option Strict On
 Imports System
 Class Tester

     Public Shared Sub DisplayArray(ByVal theArray( ) As Object)

         Dim obj As Object
         For Each obj In theArray
             Console.WriteLine("Value: {0}", obj)
         Next obj
         Console.WriteLine(ControlChars.Lf)
     End Sub 

     Public Shared Sub Main( )
         Dim myArray As [String]( ) = {"W", "s", "J", "t"}

         Console.WriteLine("Display myArray...")
         DisplayArray(myArray)

         Console.WriteLine("Reverse and display myArray...")
         Array.Reverse(myArray)
         DisplayArray(myArray)

         Dim myOtherArray As [String]( ) ={"W", "d", "e", "s", "o", "e", "f", "t"}

         Console.WriteLine("Display myOtherArray...")
         DisplayArray(myOtherArray)

         Console.WriteLine("Sort and display myOtherArray...")
         Array.Sort(myOtherArray)
         DisplayArray(myOtherArray)
     End Sub 'Main
 End Class 'Tester

Display myArray...
Value: W
Value: s
Value: J
Value: t


Reverse and display myArray...
Value: t
Value: J
Value: s
Value: W


Display myOtherArray...
Value: W
Value: d
Value: e
Value: s
Value: o
Value: e
Value: f
Value: t


Sort and display myOtherArray...
Value: d
Value: e
Value: e
Value: f
Value: o
Value: s
Value: t
Value: W