Mega Code Archive

 

Categories / VB.Net Tutorial / LINQ

 

Using Aggregating Aggregate to create a running product

Imports System.IO Imports System.Reflection Imports System.Linq Imports System.Xml.Linq Public Class MainClass    Public Shared Sub Main         Dim doubles = New Double() {1.1, 2.2, 1.3, 4.4, 2.5}         Dim product = doubles.Aggregate(Function(runningProduct, nextFactor) runningProduct * nextFactor)         Console.WriteLine("Total product of all numbers: " & product)    End Sub End Class