Imports System
Imports System.Linq
Imports System.Collections.Generic
Public Class Program
Public Shared Sub Main()
Dim arr As String() = {"c#", "c", "c++", "vb.net", "javascript", "java", "python", "node.js"}
Dim query As IEnumerable(Of String) = arr.OrderBy(Function(s) s.Length).ThenBy(Function(s) s)
For Each str As String In query
Console.WriteLine(str)
Next
End Sub
End Class
' run:
'
' c
' c#
' c++
' java
' python
' vb.net
' node.js
' javascript
'