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...[ 查看全文 ]