Imports System
Imports System.IO
Imports System.Reflection
Imports System.Linq
Imports System.Xml.Linq
Public Class MainClass
Public Shared Sub Main
Dim digits = New String() {"zero", "one", "two", "three"}
Dim sortedDigits = From dig In digits _
Order By dig.Length, dig
Console.WriteLine("Sorted digits:")
For Each d In sortedDigits
Console.WriteLine(d)
Next
End Sub
End Class
|