VB.NET GroupBy多个属性

Dim students = New List(Of Student)() From {
    New Student With {.Name = "Alice", .Age = 20, .Grade = "A"},
    New Student With {.Name = "Bob", .Age = 18, .Grade = "B"},
    New Student With {.Name = "Alice", .Age = 22, .Grade = "A"},
    New Student With {.Name = "Bob", .Age = 19, .Grade = "B"}
}

Dim groupedStudents = From student In students
                      Group By student.Name, student.Grade Into Group
                      Select New With {
                          .Name = Name,
                          .Grade = Grade,
                          .Count = Group.Count()
                      }

For Each group In groupedStudents
    Console.WriteLine("Name: " & group.Name)
    Console.WriteLine("Grade: " & group.Grade)
    Console.WriteLine("Count: " & group.Count)
Next