[VB6]Dictionary 物件

vb6中好用的物件之一

不同於二維陣列,可隨時擴充,不用再redim
擁有key value,item value兩層存放資料
使用前記得先引用,專案->設定引用項目中找到 Microsoft Scripting Runtime

例:
Dim dict1 as dictionary

Set dict1 = New Dictionary

'指定資料進去
         key value / item value
dict1(會員姓名)=王大明
dict1(電話)=05-2325894

'輸出的資料 (txt1,txt2,txt3為Textbox)

txt1.text=dict1.Keys(0)
txt2.text=dict1.Items(會員姓名)
txt3.text=dict1("會員姓名")

Set dict1 = Nothing

txt1則顯示 '會員姓名'
txt2則顯示 '王大明'
txt3則顯示 '王大明'