sadlkaj;ldasjl; fkhsa;kfhsdlkfhasdlkjfhskldajfhkldahkflkjdshlkfsdafsda

代码如下:Dim strOk,strNo      strOk = “12312321$12312312312$12312321$”      strNo = “12312321$12312312312$12312321$sdfsd”      Function RegExpTest(patrn, strng)          Dim regEx, match, matches   ‘ 建立变量。          Set regEx = New RegExp   ‘ 建立规范表达式。