C# Online Compiler | .NET Fiddle

Imports System
Imports System.Linq
Imports System.Collections.Generic

				
Public Module Module1
	Public Sub Main()
		Dim studentList = New List(Of Student) From {
			New Student() With {.StudentID = 1, .StudentName = "John", .Age = 13 },
			New Student() With {.StudentID = 2, .StudentName = "Moin", .Age = 21 },
			New Student() With {.StudentID = 3, .StudentName = "Bill", .Age = 18 },
			New Student() With {.StudentID = 4, .StudentName = "Ram", .Age = 20 },
			New Student() With {.StudentID = 5, .StudentName = "Ron", .Age = 15 }
		}
		

		Dim avgAge = Aggregate st In studentList Into Average(st.Age)

		Console.WriteLine("Average Age of Student: {0}", avgAge)
		
	End Sub
End Module
	
	Public Class Student
		Private _studentID As integer
		Private _studentName As string
		Private _age As integer
		Private _standardID As integer
		
		Property StudentID() As integer
			Get
				Return _studentID
        	End Get
			Set(ByVal Value As integer)
				_studentID = Value
        	End Set
		End Property
		
		Property StudentName() As string
			Get
				Return _studentName
        	End Get
			Set(ByVal Value As string)
				_studentName = Value
        	End Set
		End Property
		
		Property Age() As integer
			Get
				Return _age
        	End Get
			Set(ByVal Value As integer)
				_age = Value
        	End Set
		End Property
		
	End Class

 
Imports System
Imports System.Linq
Imports System.Collections.Generic
​
                
Public Module Module1
    Public Sub Main()
        Dim studentList = New List(Of Student) From {
            New Student() With {.StudentID = 1, .StudentName = "John", .Age = 13 },
            New Student() With {.StudentID = 2, .StudentName = "Moin", .Age = 21 },
            New Student() With {.StudentID = 3, .StudentName = "Bill", .Age = 18 },
            New Student() With {.StudentID = 4, .StudentName = "Ram", .Age = 20 },
            New Student() With {.StudentID = 5, .StudentName = "Ron", .Age = 15 }
        }
        
​
        Dim avgAge = Aggregate st In studentList Into Average(st.Age)
​
        Console.WriteLine("Average Age of Student: {0}", avgAge)
        
    End Sub
End Module
    
    Public Class Student

Cached Result

zeit t/s: 1 2 3 4 5 6 7 8 9 10
H s/m: 4.905 19.62 44.145 78.48 122.625 176.58 240.345 313.92 397.305 490.5