当前位置: 首页 > 图文教程 > 网络编程 > 正则表达式 > vbs:把一段文字中指定字符颜色变成红色的正则

正则表达式
js:正则处理超文本流
正则表达式高级学习技巧
用正则表达式来表示中文
正则表达式,相关链接
js:日期正则表达式及检测
正则表达式检查来访IP是否合法的实际应用
正则表达式简单的检查输入email是否合法程序
VBscript 的正则表达式 字符串匹配
比较不错的C#中的常用的正则表达式
EditPlus 正则替换图片ubb替换成img
向大家推荐一个收集整理正则表达式的网站
正则表达式详述第一部
正则表达式详述 二
正则表达式详述 三
正则表达式详述 四
正则(JS)re=new RegExp("^\\d*$");与re=/^\d*$/;之间区别?
用正则按最后一个"_"分割"字符
[PHP]常用正则表达式收集
一个非常不错的一个正则练习JS版
js正则匹配table tr

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 82 ::
收藏到网摘: n/a

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替换为红色的。