怎样得到不符合某一正则表达式的记录?
一个文本文件,一行一条记录
其中一部分记录符合这个正则表达式,一部分不符合
我想把符合的列在一个文件里,这个比较好办
Set Matches = rex.execute(content)
For Each i In Matches
output.writeline i
Next
但是怎样把不符合表达式的记录都找出来,也保存在一个像Matches一样的集合里呢
[解决办法]
帮楼主捞下帖。
[解决办法]
貌似只能行遍历了
[解决办法]
写个反的正则就可以了啊,如原来的正则式 \s+\d\s+,改成 [^(\s+\d\s+)]+ 就可以了啊
[解决办法]
用正则替换,将符合正则表达式的记录替换为空串.余下的就是,RegExp对象有个Replace属性,如:
'引用了Microsoft VBScript Regular Expressions 5.5Private Sub Command1_Click()Dim re As RegExp Set re = New RegExp re.IgnoreCase = True re.Global = True re.Pattern = "\w" s = "我想把符合Matches的列在一个文件里writeline" S1 = re.Replace(s, "") '除去英文字符MsgBox S1End Sub
[解决办法]
弱弱的问一句,什么叫做正则表啊??
[解决办法]