 NewXing.RegExp 正则组件.rar 本组件用的是DEELX 正则引擎封装的com组件。
特点：
1、完全兼容VBScript.RegExp 正则组件的各种属性与方法
2、支持与 Perl 兼容的正则表达式语法。
3、支持 Ignorecase, Singleline, Multiline… 等常见匹配模式。
4、支持命名分组，条件表达式，递归表达式，零宽断言…等多种高级特性。
详细语法与编程帮助请下载《NewXing.RegExp帮助文档》。
一、NewXing.RegExp 对象
| 属性 |
描述 |
| Global |
是否全局匹配，默认值False，即只会匹配一次，如要匹配所有需将它的值设置为True |
| IgnoreCase |
匹配时是否忽略大小写，默认是区分大小的。值:(True/False) |
| Pattern |
用于设置正则表达式。值:字符串 |
|
Multiline
|
多行模式。
使 ^ 符号除了能够匹配字符串开始位置外，还能匹配换行符（\n）之后的位置；使 $ 符号除了能够匹配字符串结束位置外，还能匹配换行符之前的位置。
默认情况下， ^ 符号只能匹配字符串开始位置， $ 符号只能匹配字符串结束位置。
SINGLELINE 和 MULTILINE 虽然听起来相互矛盾，但却是作用在不同的地方。因此它们是可以组合使用的。
在指定了 MULTILINE 之后，如果需要仅匹配字符串开始和结束位置，可以使用 \A 和 \Z。
|
|
Singleline *
|
单行模式。
使小数点 "." 可以匹配包含换行符（\n）在内的任意字符。默认情况下，小数点只匹配换行符以外的任意字符，不匹配换行符。
|
| RightToLeft * |
从右向左的进行匹配。从被匹配字符串的结束位置向前进行查找匹配，同时，在表达式中也是右侧的表达式先进行匹配。 |
| Extended * |
忽略表达式中的空白字符，并且把从 # 开始到该行行末的内容视为注释。默认情况下，正则表达式中的空格，换行等字符将可以匹配相应的字符。
指定了 EXTENDED 模式后，如果要在正则表达式中表示空白字符比如空格符号（space）时，应该用 \x20 表示，如果要在表达式中表示 # 符号，应该用 \# 表示。
不管是否指定了 EXTENDED 模式，括号内以 ?# 号开始时，比如(?# xxx )，那么这一对括号以及包含的内容都始终作为注释而被忽略。
|
提示：IgnoreCase、Singleline、Global、Multiline、RightToLeft、Extended 这几个属性可用flags参数来设置(后面会讲到)，也可以说这几个属性是多余的，只是为了兼容VBScript.RegExp 正则的语法而增加了。
| 方法 |
描述 |
| Execute |
该方法用来查找字符串，找到的字符串将通过MatchCollection集合返回。 |
| Replace |
这个方法用于替换在正则表达式搜索中找到的文本。 |
| Test |
Test方法对字符串执行正则表达式搜索，并返回一个布尔值说明匹配是否成功。 |
|
Split *
|
按照指定的表达式字符串对目标字符串进行分割并返回一维数组。 |
PS: * 星号表示新增的属性/方法。即VBScript.RegExp 没有的功能。
二、NewXing.MatchCollection 对象
MatchCollection 是集合对象，包含有关匹配字符串的信息，该对象包含每个成功匹配的 Match 对象。
| 属性 |
描述 |
| Count |
匹配对象的总数。 |
| Item |
匹配对象的索引。 |
三、NewXing.Match 对象
Match 是成功匹配的对象。
| 属性 |
描述 |
| FirstIndex |
匹配对象所匹配字符串的起始位置。 |
| Length |
匹配对象所匹配字符串的字符长度。 |
| SubMatches |
匹配对象所匹配结果的子项,返回SubMatches集合。通过该集合可以获取匹配到的各个命名分组结果。 |
| Value |
匹配对象所匹配的值。 |
| Named * |
通过命名分组的名字来获取匹配到的结果。 |
四、NewXing.SubMatches 对象
SubMatches 得到当次匹配到的所有“分组”结果集合。
| 属性 |
描述 |
| Count |
分组总数 |
| Item |
匹配到的结果索引。 |
五、最后说一下NewXing.RegExp 对象的4个方法的相关参数与作用。
语法：
1、Execute
Execute (sourceString As String, [pattern As String], [flags As String], [start As Long] = -1) As MatchCollection
2、Replace
Replace (sourceString As String, replaceVar As String, [pattern As String], [flags As String], [start As Long] = -1, [times As Long] = -1) As String
3、Test
Test (sourceString As String, [pattern As String], [flags As String], [start As Long] = -1) As Boolean
4、Split
Split (sourceString As String, [pattern As String], [flags As String], [start As Long] = -1, [times As Long] = -1) As Object
参数说明：
| 参数 |
描述 |
| sourceString |
必填参数，用来匹配的文本。 |
| replaceVar |
必填参数，是用来替代的字符串。Replace 方法中才用到该参数。 |
| pattern * |
可选参数，设置正则表达式。如果RegExp.pattern 属性中已设置那么这个参数可忽略，如果两者同时设置,将会选用本参数的表达式进行匹配。 |
| flags * |
可选参数，表达式匹配模式。值为：i、s、g、m、r、x
以上字母分别代表：IgnoreCase、Singleline、Global、Multiline、RightToLeft、Extended
i、s、g、m、r、x 可随意组合。
例如：
RegExp.IgnoreCase = True
RegExp.Global = True
可直接用该参数 ig 来代替。当您设置了该参数的值后 IgnoreCase、Singleline、Global、Multiline、RightToLeft、Extended这
6个属性的设置就不起作用了。
|
|
start *
|
可选参数，开始查找匹配的位置。 |
| times * |
可选参数，replace方法中用于指定进行替换的次数。默认(-1)表示替换所有匹配。 split 方法中用于指定可拆分为多少个数组，默认拆分所有。
|
示例：
- VBScript code复制代码
Private Sub Form_Load()
Dim Regex As Object
Set Regex = CreateObject("NewXing.RegExp")
Regex.IgnoreCase = True
Regex.Global = True
Regex.Pattern = "(\d+)"
MsgBox Regex.Replace("aa 11 bb 22 33", "[$1]")
'输出结果：aa [11] bb [22] [33]
End Sub
以上的代码也可以简化为以下这样。
- VBScript code复制代码
Private Sub Form_Load()
Dim Regex As Object
Set Regex = CreateObject("NewXing.RegExp")
MsgBox Regex.Replace("aa 11 bb 22 33", "[$1]", "(\d+)", "ig")
End Sub
|
