[VB.NET]SortメソッドでListの要素を昇順に並べる

2021年11月26日

構文
Dim リスト名 As New List(Of Double)
リスト名.Sort()
既定の比較子を使用して、List<T> 全体内の要素を並べ替えます。
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Module Module1
Public Sub Main()
'リストの初期化
Dim cftLst As New List(Of Double)
cftLst.Add(2.3)
cftLst.Add(4.5)
cftLst.Add(1.1)
cftLst.Add(0.6)
'昇順でリストの内容を並べ替え
cftLst.Sort()
Console.WriteLine("Listの要素を昇順に並べる結果")
'リストの内容をループで出力
For i As Integer = 0 To cftLst.Count - 1
Console.WriteLine(cftLst(i))
Next
Console.ReadKey()
End Sub
End Module
Module Module1 Public Sub Main() 'リストの初期化 Dim cftLst As New List(Of Double) cftLst.Add(2.3) cftLst.Add(4.5) cftLst.Add(1.1) cftLst.Add(0.6) '昇順でリストの内容を並べ替え cftLst.Sort() Console.WriteLine("Listの要素を昇順に並べる結果") 'リストの内容をループで出力 For i As Integer = 0 To cftLst.Count - 1 Console.WriteLine(cftLst(i)) Next Console.ReadKey() End Sub End Module
Module Module1

    Public Sub Main()

        'リストの初期化
        Dim cftLst As New List(Of Double)
        cftLst.Add(2.3)
        cftLst.Add(4.5)
        cftLst.Add(1.1)
        cftLst.Add(0.6)

        '昇順でリストの内容を並べ替え
        cftLst.Sort()

        Console.WriteLine("Listの要素を昇順に並べる結果")
        'リストの内容をループで出力
        For i As Integer = 0 To cftLst.Count - 1
            Console.WriteLine(cftLst(i))
        Next
        Console.ReadKey()
    End Sub

End Module

実行結果

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Listの要素を昇順に並べる結果
0.6
1.1
2.3
4.5
Listの要素を昇順に並べる結果 0.6 1.1 2.3 4.5
Listの要素を昇順に並べる結果
0.6
1.1
2.3
4.5

 

VB.net

Posted by arkgame