我想用正则表达式 regex
因为我整个程序大部分都是在匹配,正则表达式好用些
Private Sub Command1_Click()
Print regEx("12大(dAdd)在3456", "\((.*?)\)")
End Sub
Function regEx(a, b) As String
With CreateObject("VBSCRIPT.REGEXP")
.Pattern = b
.Global = True
regEx = Replace(.Replace(a, "*"), "*", "a")
End With
End Function
这个我能匹配到括号里的内容并替换成a,就是不知道怎么保留下来