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 QueryString As String() = New String() {"One", "Two", "Three", "Four", "Five"}
      Dim ThisQuery = From StringValue In QueryString _
         Where StringValue.Length > 3 _
         AndAlso StringValue.StartsWith("F") _
         Select StringValue + vbCrLf
      For Each ThisValue In ThisQuery
         Console.WriteLine(ThisValue)
      Next
   End Sub 
End Module