Function Ghtml(Text)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
Ghtml = RegEx.Replace(Text,"")
Set RegEx = NoThing
End Function
删除用户输入中的html标记部分
最新推荐文章于 2023-04-27 15:32:38 发布
Function Ghtml(Text)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
Ghtml = RegEx.Replace(Text,"")
Set RegEx = NoThing
End Function