本页面由网页陶吧 龙犊收集整理 时间是: 02/05/06 下午 05:59:00.
页面地址: vsmthReplace.htm
标题: Replace 方法  •  文件大小: 3239  •  更新时间: Sun, 05 Feb 2006 03:21:34 GMT

Replace 方法

替换在正则表达式查找中找到的文本。

object.Replace(string1, string2)

参数

object

必选项。总是一个 RegExp 对象的名称。

string1

必选项。string1 是将要进行文本替换的字符串。

string2

必选项。 string2 是替换文本字符串。

说明

被替换的文本的实际模式是通过 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 FunctionMsgBox(ReplaceTest("fox", "cat"))            '  'fox' 替换为 'cat'

;另外,Replace 方法在模式中替换 subexpressions 。 下面对以前示例中函数的调用,替换了原字符串中的所有字对:

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

要求

版本 5

请参阅

Execute 方法 | Test 方法

应用于: RegExp 对象