Output Items in a SortedList
Imports System Imports System.Collections Imports System.Collections.Specialized Public Class MainClass Shared Sub Main(ByVal args As String()) Dim sortedList As New SortedList sortedList.Add("2", "T") sortedList.Add("0", "T") sortedList.Add("1", "O") sortedList.Add("6", "S") For i As Integer = 0 To sortedList.Count - 1 Console.WriteLine(sortedList.GetKey(i).ToString() & ": " & _ sortedList.GetByIndex(i).ToString()) Next i sortedList.Clear() End Sub End Class