我是靠谱客的博主 欢喜枕头,这篇文章主要介绍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:把一段文字中指定字符颜色变成红色内容请搜索靠谱客的其他文章。

本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
点赞(122)

评论列表共有 0 条评论

立即
投稿
返回
顶部