Set dic=CreateObject("Scripting.Dictionary")
dic.Add "a",1
dic.Add "b",2
dic.Add "c",3
If dic.Exists("b") Then
msgbox dic("b")
End If
---------------------------------------------------------------
AUTHOR:testerZH
用途:菜鸟的个人学习记录,有不对的地方请指正!谢谢!
出处:http://www.cnblogs.com/testerZH/