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里面就是这么罗嗦,没办法