1.前期绑定
工具---引用---浏览---找到scrrun.dll---确定
dim d as new dictionary
2.后期绑定
dim d as object
set d=createobject("scripting.dictionary")