Max(TSource) Method (IEnumerable(TSource), Func(TSource, Single))

Enumerable.Max(Of TSource) Method (IEnumerable(Of TSource), Func(Of TSource, Single))


Invokes a transform function on each element of a sequence and returns the maximum Single value.

Namespace:   System.Linq
Assembly:  System.Core (in System.Core.dll)

Public Shared Function Max(Of TSource) (
	source As IEnumerable(Of TSource),
	selector As Func(Of TSource, Single)
) As Single


Type: System.Collections.Generic.IEnumerable(Of TSource)

A sequence of values to determine the maximum value of.

Type: System.Func(Of TSourceSingle)

A transform function to apply to each element.

Return Value

Type: System.Single

The maximum value in the sequence.

Type Parameters


The type of the elements of source.

Exception Condition

source or selector is null.


source contains no elements.

The Max(Of TSource)(IEnumerable(Of TSource), Func(Of TSource, Single)) method uses the Single implementation of IComparable(Of T) to compare values.

You can apply this method to a sequence of arbitrary values if you provide a function, selector, that projects the members of source into a numeric type, specifically Single.

In Visual Basic query expression syntax, an Aggregate Into Max() clause translates to an invocation of Max.

The following code example demonstrates how to use Max(Of TSource)(IEnumerable(Of TSource), Func(Of TSource, Int32)) to determine the maximum value in a sequence of projected values.


This code example uses an overload of this overloaded method that is different from the specific overload that this topic describes. To extend the example to this topic, change the body of the selector function.

Structure Pet
    Public Name As String
    Public Age As Integer
End Structure

Sub MaxEx4()
    ' Create an array of Pet objects.
    Dim pets() As Pet = {New Pet With {.Name = "Barley", .Age = 8}, _
                         New Pet With {.Name = "Boots", .Age = 4}, _
                         New Pet With {.Name = "Whiskers", .Age = 1}}

    ' Determine the "maximum" pet by passing a
    ' lambda expression to Max() that sums the pet's age
    ' and name length.
    Dim max As Integer = pets.Max(Function(pet) _
                                      pet.Age + pet.Name.Length)

    ' Display the result.
    MsgBox("The maximum pet age plus name length is " & max)
End Sub

' This code produces the following output:
' The maximum pet age plus name length is 14

Universal Windows Platform
Available since 4.5
.NET Framework
Available since 3.5
Portable Class Library
Supported in: portable .NET platforms
Available since 2.0
Windows Phone Silverlight
Available since 7.0
Windows Phone
Available since 8.1
Return to top
© 2015 Microsoft