打印本文 打印本文  关闭窗口 关闭窗口
如何使replace方法不区分大小写?
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005/9/10 13:43:03
被替换的文本的实际模式是通过 RegExp 对象的 Pattern 属性设置的。

Replace 方法返回 string1 的副本,其中的 RegExp.Pattern 文本已经被替换为 string2。如果没有找到匹配的文本,将返回原来的 string1 的副本。

下面的例子说明了 Replace 方法的用法。

Function ReplaceTest(patrn, replStr)
  Dim regEx, str1               ' 建立变量。
  str1 = "The quick brown fox jumped over the lazy dog."
  Set regEx = New RegExp               ' 建立正则表达式。
  regEx.Pattern = patrn               ' 设置模式。
  regEx.IgnoreCase = True               ' 设置是否区分大小写。
  ReplaceTest = regEx.Replace(str1, replStr)         ' 作替换。
End Function

MsgBox(ReplaceTest("fox", "cat"))            ' 将 'fox' 替换为 'cat'。
;另外,Replace 方法在模式中替换 subexpressions 。 下面对以前示例中函数的调用,替换了原字符串中的所有字对:

MsgBox(ReplaceText("(S+)(s+)(S+)", "$3$2$1"))         ' 交换词对.

要求的脚本语言在5.0以上



打印本文 打印本文  关闭窗口 关闭窗口