脚本宝典收集整理的这篇文章主要介绍了vbs:把一段文字中指定字符颜色变成红色的正则，脚本宝典觉得挺不错的，现在分享给大家，也给大家做个参考。

vbs:把一段文字中指定字符颜色变成红色的正则

 
function c(Tstr,Word) 
Dim re 
Set re = new RegExp 
re.IgnoreCase =True 
re.Global=True 
re.pattern = "("&Word&")" 
c=re.replace(Tstr,"<font style='color:red;'>$1</font>") 
End function 

调用方法 

response.wrITe c("内容字串","要显示为红色的字") 

比如 

<% 
function c(Tstr,Word) 
Dim re 
Set re = new RegExp 
re.IgnoreCase =True 
re.Global=True 
re.pattern = "("&Word&")" 
c=re.replace(Tstr,"<font style='color:red;'>$1</font>") 
End function 
Response.write("lamking.COM","a") 
%> 
就把lamking.com中的a替换为红色的。 

脚本宝典总结

以上是脚本宝典为你收集整理的vbs:把一段文字中指定字符颜色变成红色的正则全部内容，希望文章能够帮你解决vbs:把一段文字中指定字符颜色变成红色的正则所遇到的问题。

如果觉得脚本宝典网站内容还不错，欢迎将脚本宝典推荐好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。