日期:2014-05-17  浏览次数:21143 次

Matches和SubMatches的使用
Function   getText(fString,   patrn,n)  
dim   Matches,   tStr
tStr   =   fString
Set   re   =   New   Regexp
re.IgnoreCase   =   True
re.Global   =   True
re.Pattern   =     patrn
set   Matches   =   re.Execute(tStr)
set   re   =   nothing  
rStr   =   " "
For   Each   Match   in   Matches
rStr   =   Match.SubMatches(n)
exit   for
Next
getText   =   rStr
End   Function

这个是用来正则取内容
没问题的
不过我觉得这里
For   Each   Match   in   Matches
rStr   =   Match.SubMatches(n)
exit   for
Next
比较啰嗦的感觉
应该有更好的方法吧


------解决方案--------------------
我就是这样用。。不管。。哈
------解决方案--------------------
Matches 就是你正则的匹配的整个
Match.SubMatches(n) 就是你 正则匹配内部的那些 () 的那些匹配啊

VBS里面就是这么罗嗦,没办法