當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET Enumerable.ThenByDescending方法代碼示例

本文整理匯總了VB.NET中System.Linq.Enumerable.ThenByDescending方法的典型用法代碼示例。如果您正苦於以下問題:VB.NET Enumerable.ThenByDescending方法的具體用法?VB.NET Enumerable.ThenByDescending怎麽用?VB.NET Enumerable.ThenByDescending使用的例子?那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。


在下文中一共展示了Enumerable.ThenByDescending方法的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: CaseInsensitiveComparer

' This class provides a custom implementation of the Compare() method.
Class CaseInsensitiveComparer
    Implements IComparer(Of String)

    Function Compare(ByVal x As String, ByVal y As String) As Integer _
    Implements IComparer(Of String).Compare

        ' Compare values and ignore case.
        Return String.Compare(x, y, True)
    End Function
End Class

Sub ThenByDescendingEx1()
    Dim fruits() As String =
    {"apPLe", "baNanA", "apple", "APple", "orange", "BAnana", "ORANGE", "apPLE"}

    ' Sort the strings first by their length and then 
    ' by using a custom "case insensitive" comparer.
    Dim query As IEnumerable(Of String) =
    fruits _
    .OrderBy(Function(fruit) fruit.Length) _
    .ThenByDescending(Function(fruit) fruit, New CaseInsensitiveComparer())

    ' Display the results.
    Dim output As New System.Text.StringBuilder
    For Each fruit As String In query
        output.AppendLine(fruit)
    Next
    Console.WriteLine(output.ToString())
End Sub
開發者ID:VB.NET開發者,項目名稱:System.Linq,代碼行數:30,代碼來源:Enumerable.ThenByDescending

輸出:

apPLe
apple
APple
apPLE
orange
ORANGE
baNanA
BAnana


注:本文中的System.Linq.Enumerable.ThenByDescending方法示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。