Imports System
Imports System.Linq
Public Module Module1
Public Sub Main()
Dim arr As Integer() = {4, 6, 1, 9, 3}
Dim sort_arr = From n In arr Order By n Select n
For Each number As Integer In sort_arr
Console.WriteLine(number)
Next
End Sub
End Module
' run"
'
' 1
' 3
' 4
' 6
' 9
'