Regex VBScript：如何使用正则表达式替换来添加换行符？

我有一根长的单行线。我想在我找到的每一个匹配后添加一个换行符；在这个例子中，我正在搜索“foo”

我可以成功找到“foo”的所有实例并触发替换：

    strText="stufffoobarbazfoofoomorestuff"
    Set reZap = New RegExp
    reZap.Global  = True
    reZap.Pattern = "(foo)"
    strNewText = reZap.Replace(strText, "$1\n")

问题是，这只是在字符串中插入“\n”，所以当我真正想要的是

“玩偶 巴巴兹福 福 “更多东西”

---

如何让Replace添加换行符？

我知道了，诀窍是使用vbCrLf而不是regexp的\n：

    strNewText = reZap.Replace(strText, "$1" & vbCrLf )

---

我想你也需要一个

CR

。请尝试

\r\n

而不是

\n

。