Module Module1
Sub Main()
Dim list As SortedList(Of String, String) =
New SortedList(Of String, String)
list.Add("vb.net", "w8")
list.Add("java", "d6")
list.Add("php", "l2")
list.Add("python", "q3")
list.Add("c#", "p2")
For Each pair As KeyValuePair(Of String, String) In list
Console.WriteLine(pair.Key + " : " + pair.Value)
Next
End Sub
End Module
' run:
'
' c# : p2
' java: d6
' php: l2
' python: q3
' vb.net : w8