VFP正则表达式应用:替换指定内容到行尾

正则表达式 | 2017-11-19 19:29:41 | 79次阅读 | 0评
原始文本如下面两行
abc aaaaa
123 abc 444
希望每次遇到“abc”,则替换“abc”以及其后到行尾的内容为“abc efg”
即上面的文本最终替换为:
abc efg
123 abc efg

=====================================
CLEAR
Re = Createobject("VBScript.RegExp")
Re.Global = .T.
Re.Ignorecase = .F.
RE.Pattern ="abc.*"
cStr="abc aaaaa"+CHR(13)+CHR(10)+"123 abc 444"
?cStr
?Re.Replace(cStr,"abc efg")








博友评论,共0条
浏览156270次