多语言使用正则表达式

因工作需要在多语言环境下使用个性字符串格式检查 。即参考网络上代码，汇集如下：

一、备忘标识

          结尾：$                                             

          字符串并列：(CSV|csv) 包含大小写

          

二、VB 6

     引用Microsoft  VBScript regular expressions 5.5     

• 格式：dim 对象名称   as RegExp

           dim 名称   as MatchCollection

           dim  名称   as  Match

• 属性：对象名称.IgnoreCase=[boolean]  大小写

           对象名称.Global=[boolean]  全部匹配

            对象名称.Pattern=[String]   正则表达式               

•  方法：  .Test(Content)    =[boolean]测试是否匹配

                .Execute(Content) =[MatchCollection]  匹配结果集合

Dim re As RegExp  
    Set re = New RegExp  
     re.IgnoreCase = False　'设置是否匹配大小写  
     re.Pattern = p  
     blnvalue = re.Test(s)   '匹配结果

'——声明
dim mRegExp as Object
dim mMatches as object
dim mMatch as Object 

'——初始化
set mRegExp=CreateObject("Vbscript.Regexp")
With mRegExp
    .Global=True                 '匹配所有
    .IgnoreCase=True             '大小写
    .Pattern="(串)"              '匹配串
    Set mMatches=.execute("")    '无匹配， 
    返回空