1、第一步：在vb6.0的编译环境中选 工程——引用然后选中Microsoft scripting runtime
2、创建Dictionary指令： Set dict = NewDictionary (往下的步骤中都以对象dict为例讲解的)
3、增加项目指令 ：dict.Add "A1"巳呀屋饔, "B1" （A1为key；B1为value；注意key添加的时候不可以重复，value可以重复）
4、判断是否有对应的key的指令：dict.Exists("A1")对应key的value重新赋值指令：dict.item("A1")="BB1"
5、移除相应的key的项目指令：dict.Remove("A2")移除整个对象的指令：dict.RemoveAll统计对象的项目个数指令：dict.Count
6、针对整个对象的循环指令：For Each item In dict Next中间可以取出相应的value（也可以对其做相应的处理）：dict(item)
7、下面是一个例子及显示的结果可以供参考
