建立一個充滿值的字典

Dim extensions As New Dictionary(Of String, String) _
  from { { "txt", "notepad" },
  { "bmp", "paint" },
  { "doc", "winword" } }

這會建立一個字典並立即用三個 KeyValuePairs 填充它。

你也可以稍後使用 Add 方法新增新值：

extensions.Add("png", "paint")

請注意，鍵（第一個引數）在字典中必須是唯一的，否則將丟擲異常。