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() {2, 1, 2, 3, 4, 3, 1, 5}
      Dim ThisQuery = From ThisElement In TestArray _
                      Order By ThisElement _
                      Select ThisElement Distinct
      For Each TheResult In ThisQuery
         Console.WriteLine(TheResult.ToString())
      Next
   End Sub 
End Module