Mega Code Archive

 

Categories / VB.Net / LINQ

 

Compound Order By Ascending then Descending

Imports System Imports System.IO Imports System.Reflection Imports System.Linq Imports System.Xml.Linq Public Class MainClass    Public Shared Sub Main         Dim words() As String = {"This", "this", "Is", "is", "A", "a"}         Dim sortedWords = From word In words _                           Order By word.Length, word Descending         For Each d In sortedWords             Console.WriteLine(d)         Next    End Sub End Class