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")
Dim ilistKeys As IList(Of String) = openWith.Keys
For Each s As String In ilistKeys
Console.WriteLine("Key = {0}", s)
Next s
End Sub
End Class