vbscript正则表达式测试方法