Imports System
Imports System.Linq
Class User
Public Property Name As String
Public Property age As Integer
End Class
Public Class Program
Public Shared Sub Main()
Dim users As User() = {New User With {
.Name = "James T. Kirk",
.age = 51
}, New User With {
.Name = "Spock",
.age = 68
}, New User With {
.Name = "Leonard McCoy",
.age = 46
}}
Dim result = From c In users Order By c.age Select c
For Each user As User In result
Console.WriteLine(String.Format("{0}: {1}", user.Name, user.age))
Next
End Sub
End Class
' run:
'
' Leonard McCoy: 46
' James T. Kirk: 51
' Spock: 68
'