LINQ VB.Net

Imports System
Imports System.Collections.Generic
Imports System.Data
Imports System.Linq
Imports System.Text
Imports System.Globalization
Module Example
   Public Sub Main()
      Dim TestArray As Integer() = New Integer() {1, 2, 3, 4, 5, 6, 7, 8}
      Dim ThisQuery = From ThisElement In TestArray Select ThisElement Skip 4
      For Each TheResult In ThisQuery
         Console.WriteLine(TheResult.ToString())
      Next
      ' Define the reverse order query.
      ThisQuery = From ThisElement In TestArray _
                  Order By ThisElement Descending _
                  Select ThisElement Skip 4 _
                  Order By ThisElement
      
      For Each TheResult In ThisQuery
         Console.WriteLine(TheResult.ToString())
      Next
   End Sub 
End Module