亲宝软件园·资讯

展开

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

人气:0
想了解vbs:把一段文字中指定字符颜色变成红色的正则的相关内容吗,在本文为您仔细讲解的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点: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替换为红色的。 

加载全部内容

相关教程
猜你喜欢
用户评论