正则表达式链接替换函数的技巧如下所示:

1)

字符串       前面的字符任意长度字符后面的字符

2)

字符串       前面的字符任意长度字符后面的字符

替换成        前面的字符任意长度字符后面的字符

3)    不属于以上情况的,直接删除链接

字符串       前面的字符任意长度字符后面的字符

替换成        前面的字符任意长度字符后面的字符

函数的样式如下,帮忙写正则表达式,谢谢。

Function ScriptHtml(Byval ConStr,FType)

Dim Re

Set Re=new RegExp

Re.IgnoreCase =true

Re.Global=True

Select Case FType

Case 1

Re.Pattern="正则表达式"

ConStr=Re.Replace(ConStr,"")

Case 2

Re.Pattern="正则表达式"

ConStr=Re.Replace(ConStr,"")

Case other

End Select

ScriptHtml=ConStr

Set Re=Nothing

End Function

以上内容是关于正则表达式链接替换函数的技巧,希望大家喜欢。

Logo

北京人形旗下天工造物具身智能开源社区,聚焦具身天工与慧思开物两大平台

更多推荐