Imports System
Imports System.Linq
Public Module Module1
Public Sub Main()
Dim arr As Integer() = {6, 8, 3, 9, 2, 4, 5}
Dim average_value = Aggregate n In arr Into Average()
Console.WriteLine(average_value)
End Sub
End Module
' run
'
' 5.28571428571429
'