VB.Net Tutorial/Collections/SortedList

SortedList

<source lang="vbnet">Imports System.Collections public class Test

  public Shared Sub Main
       
       Dim jobs As New SortedList
       jobs.Add("02", "Two")
       jobs.Add("10", "Ten")
       jobs.Add("01", "One")
       jobs.Add("06", "Six")
       For i As Integer = 0 To jobs.Count - 1
           Console.WriteLine(jobs.GetKey(i).ToString() & ": " & _
               jobs.GetByIndex(i).ToString())
       Next i
       jobs.Clear()
       jobs.Add(2, "Two")
       jobs.Add(10, "Ten")
       jobs.Add(1, "One")
       jobs.Add(6, "Six")
       For i As Integer = 0 To jobs.Count - 1
           Console.WriteLine(jobs.GetKey(i).ToString() & ": " & _
               jobs.GetByIndex(i).ToString())
       Next i
  End Sub

End class</source>

01: One
02: Two
06: Six
10: Ten
1: One
2: Two
6: Six
10: Ten