典型的使用正则表达式的例子
例如,经常遇到的获取<font></font>中间的字符串
首先要写一个不支持嵌套的正则表达式
在这里是:"中华([^中华|共和国]*)共和国"
Function getStrBetween(patrn, strng)
Dim regEx, Matches
Set regEx = New RegExp
regEx.Pattern = patrn
regEx.IgnoreCase = True '为真则忽略大小写,否则严格匹配大小写
regEx.Global = True '搜索应用于整个字符串
Set Matches = regEx.Execute(strng)
For each Match in Matches
MsgBox Match.SubMatches(0)
Next
End Function
Call getStrBetween("中华([^中华|共和国]*)共和国","红警-共和国之辉是中华中华人民共和国的中华游戏共和国游戏达人修改的")
Function写得比较简单,只是把结果MsgBox出来了
具体怎么处理,要看你自己的了