摘要：'这里通过把百度搜索封装成GUI层作为例子来举例:Class BaiduSearchPrivate m_htChildObjects '定义变量作为Scripting.Dictionary'***********为变量设置Get Set方法*************Public Property Get ChildObjects()Set ChildObjects = m_htChildObjectsEnd PropertyPublic Property Let ChildObjects(ByRef dic)Set m_htChildObjects = dicEnd P 阅读全文