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 本文共 203 字，大约阅读时间需要 1 分钟。
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 转载于:https://www.cnblogs.com/testerZH/archive/2011/10/31/2230298.html