Imports System
Imports System.Collections.Generic
Public Class Example
Public Shared Sub Main()
Dim openWith As New SortedList(Of String, String)
openWith.Add("A", "a")
openWith.Add("B", "b")
openWith.Add("C", "c")
openWith.Add("D", "d")
openWith("E") = "e"
Console.WriteLine("For key = ""rtf"", value = {0}.", _
openWith("rtf"))
End Sub
End Class