DimoRE
SetoRE=NewRegExp
oRE.Pattern=strPattern
oRE.IgnoreCase=True
doReTest=oRE.Test(strString)
SetoRE=Nothing
EndFunction
下一篇:显示分页链接