圆月山庄资源网 Design By www.vgjia.com

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"))         ' 交换词对.
标签:
|VB|BS|S教|教程|程方|方法|法R|Re|ep|pl|la|ac|ce|e方|方法|法|

圆月山庄资源网 Design By www.vgjia.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
圆月山庄资源网 Design By www.vgjia.com