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
|