Function RegUrl(TheStr)
Set RegEx = New RegExp
RegEx.IgnoreCase =True
regEx.Global = True'****这一句加上是全部替换，如果不加，只替换第一个
RegEx.Pattern = "<.*?>"
RegUrl=RegEx.replace(TheStr,"")
End Function
Function RegUrl(TheStr)
Set RegEx = New RegExp
RegEx.IgnoreCase =True
regEx.Global = True'****这一句加上是全部替换，如果不加，只替换第一个
RegEx.Pattern = "<.*?>"
RegUrl=RegEx.replace(TheStr,"")
End Function
你好，我是AI助理
可以解答问题、推荐解决方案等
