' Visual Basic 2008 9.0 .NET Examples - Query Methods - New in Visual Basic 2008 - 9.0 : 
Public Class Example2
    Public Shared Sub Main()
        Dim source = New Counter() {New Counter With {.Value = 10}, _
                                    New Counter With {.Value = 20}, _
                                    New Counter With {.Value = 30}}
        Dim predicate As Func(Of Counter, Boolean) = _
                                            Function(counter) counter.Value > 15
        Dim query1 = System.Linq.Enumerable.Where(source, predicate)
        For Each counter As Counter In query1
            Console.WriteLine(counter.Value)
        Next
        Console.WriteLine()
        '
        Dim query2 = source.Where(Function(counter) counter.Value < 25)
        For Each counter As Counter In query2
            Console.WriteLine(counter.Value)
        Next
        '
        Console.ReadLine()
    End Sub
End Class
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.