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
posted on 2011-10-31 15:04  testerZH  阅读(375)  评论(0编辑  收藏  举报