GetDictObj / GetRegExpObj
(创建时间:2011年10月14日 20:34:00)
Jangogo : 

VB
  1. '获得字典对象  
  2. Public Function GetDictObj() As Object  
  3.  On Error Resume Next  
  4.  Set GetDictObj = CreateObject("Scripting.Dictionary")  
  5. End Function  
  6.   
  7. '获得正则表达式对象  
  8. Public Function GetRegExpObj() As Object  
  9.  On Error Resume Next  
  10.  Set GetRegExpObj = CreateObject("VBScript_RegExp_55.RegExp")  
  11. End Function  
文档中心
可上传附件
选择
同时转发此条
回复
1楼
Jangogo: 
初升的太阳  10:52:56objCA=MyApp.GetDictObj()这个对象  有清空的吗  如: objCA.ClearJangogo  10:53:19有是字典对象初升的太阳  10:53:37好Jangogo  10:54:43Jangogo …【更多】