本文介绍了一个使用正则表达式实现的VBScript函数，该函数能够接收字符串和目标单词作为参数，并将字符串中匹配的目标单词进行高亮显示。
用正则表达式突出显示字符串中查询到的单词的函数
Function BoldWord(strContent,word)
dim objRegExp
Set objRegExp=new RegExp
objRegExp.IgnoreCase =true
objRegExp.Global=True
objRegExp.Pattern="(" & word & ")"
strContent=objRegExp.Replace(strContent,"<font color=""#FF0000"">$1</font>" )
Set objRegExp=Nothing
BoldWord=strContent
End Function
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
