Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim arr As String() = {"c#", "c", "rust", "dart", "vb.net", "php", "python", "java"}
Dim result = (From c In arr Order By c.Length).ThenBy(Function(c) c)
For Each s As String In result
Console.WriteLine(s)
Next
End Sub
End Class
' run:
'
' c
' c#
' php
' dart
' java
' rust
' python
' vb.net
'