?Function RegUrl(TheStr)
Set RegEx = New RegExp
RegEx.IgnoreCase =True
regEx.Global = True'****這一句加上是全部替換，如果不加，只替換第一個
RegEx.Pattern = "<.*?>"
RegUrl=RegEx.replace(TheStr,"")

End Function

轉載于:https://www.cnblogs.com/y0umer/archive/2010/07/05/3839416.html

總結

以上是生活随笔為你收集整理的正文获取摘要 去除html标记的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。