Imports System
Imports System.Collections.Generic
Public Class Example
Public Shared Sub Main()
Dim openWith As New Dictionary(Of String, String)
openWith.Add("txt", "notepad.exe")
Console.WriteLine(openWith("txt"))
End Sub
End Class