在读《VBScript程序员参考手册》,来总结一下Scripting.Dictionary对象的用法。
这个对象与数组类似,一个key对应一个item,主要起到索引的用途。
首先先建一个Scripting.Dictionary对象:
Set dicPhoneList = CreateObject("Scripting.Dictionary")
1.把数据加入字典对象
strItemAdd(LAST, 0) = "Williams"
strItemAdd(FIRST, 0) = "Tony"
strItemAdd(PHONE, 0) = "404-985-6328"
strKey = strItemAdd(PHONE, 0)
dicPhoneList.Add strKey, strItemAdd
其中strKey即字典对象中的key,strItemAdd即item
2.Remove方法与Add方法对应,使用方法相像,可以移除字典对象中的数据。
3.检测某item是否存在
例:
If dicAnimals.Exists("1234") Then
strAnimalName = dicPhoneList.Item("1234")
End If
4.CompareMode 属性
1(vbTextCompare)是进行文本比较,0(vbDatabaseCompare)是进行二进制比较。
比方说区分大小写,使用vbTextCompare时,已有abc时添加ABC即会生成错误。
5.RemoveAll方法
清空数据。