LINQ VB.Net

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