Imports System
Imports System.Linq
Public Class Test
Public Shared Sub Main(ByVal args As String())
Dim s As String = "study"
Dim s_sorted As String = String.Concat(s.OrderBy(Function(ch) ch))
Console.WriteLine(s_sorted)
End Sub
End Class
' run:
'
' dstuy
'