Enumerable.Aggregate(Of TSource) Method (IEnumerable(Of TSource), Func(Of TSource, TSource, TSource))
Applies an accumulator function over a sequence.
Assemblies: System.Linq (in System.Linq.dll)
System.Core (in System.Core.dll)
'Declaration <ExtensionAttribute> _ Public Shared Function Aggregate(Of TSource) ( _ source As IEnumerable(Of TSource), _ func As Func(Of TSource, TSource, TSource) _ ) As TSource
The type of the elements of source.
- Type: System.Func(Of , , )
An accumulator function to be invoked on each element.
The final accumulator value.
Usage NoteIn Visual Basic and C#, you can call this method as an instance method on any object of type IEnumerable(Of ). When you use instance method syntax to call this method, omit the first parameter. For more information, see Extension Methods (Visual Basic) or Extension Methods (C# Programming Guide).
The method makes it simple to perform a calculation over a sequence of values. This method works by calling func one time for each element in source except the first one. Each time func is called, passes both the element from the sequence and an aggregated value (as the first argument to func). The first element of source is used as the initial aggregate value. The result of func replaces the previous aggregated value. returns the final result of func.
This overload of the Aggregate method isn't suitable for all cases because it uses the first element of source as the initial aggregate value. You should choose another overload if the return value should include only the elements of source that meet a certain condition. For example, this overload isn't reliable if you want to calculate the sum of the even numbers in source. The result will be incorrect if the first element is odd instead of even.
The following code example demonstrates how to reverse the order of words in a string by using Aggregate.
Sub AggregateEx1() Dim sentence As String = _ "the quick brown fox jumps over the lazy dog" ' Split the string into individual words. Dim words() As String = sentence.Split(" "c) ' Prepend each word to the beginning of the new sentence to reverse the word order. Dim reversed As String = _ words.Aggregate(Function(ByVal current, ByVal word) word & " " & current) ' Display the output. MsgBox(reversed) End Sub ' This code produces the following output: ' ' dog lazy the over jumps fox brown quick the