正则表达式(RegExp)对象

提供简单的正则表达式支持功能。

说明

下面的代码说明了RegExp对象的用法：

Function RegExpTest(patrn, strng)  Dim regEx, Match, Matches'' 建立变量。  Set regEx = New RegExp'' 建立正则表达式。  regEx.Pattern = patrn'' 设置模式。  regEx.IgnoreCase = True'' 设置是否区分字符大小写。  regEx.Global = True'' 设置全局可用性。  Set Matches = regEx.Execute(strng)'' 执行搜索。  For Each Match in Matches'' 遍历匹配集合。    RetStr = RetStr & "Match found at position "    RetStr = RetStr & Match.FirstIndex & ". Match Value is ''"    RetStr = RetStr & Match.Value & "''." & vbCRLF  Next  RegExpTest = RetStrEnd FunctionMsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!