' Visual Basic 2008 9.0 .NET Examples - Query Methods - New in Visual Basic 2008 - 9.0 : 
Public Class Example9
    Public Shared Sub Main()
        Dim source = New Counter() {New Counter With {.Value = 10}, _
                                    New Counter With {.Value = 20}, _
                                    New Counter With {.Value = 30}}
        '
        Console.WriteLine(source.Any())
        Console.WriteLine(source.All(Function(counter) counter.Value Mod 2 = 0))
        Console.WriteLine(source.Average(Function(counter) counter.Value))
        Console.WriteLine(source.ElementAt(2).Value)
        Console.WriteLine(source.First().Value)
        '
        Console.ReadLine()
    End Sub
End Class
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.