正则表达式，只匹配一次下划线！-华尔子博-奥夏网

<SCRIPT LANGUAGE=”VBScript“> <!– Dim reg,str,pattern Set reg = new RegExp str = “asdf00_asdfasfd” pattern = “^[a-z][^_]*_[^_]*$” reg.IgnoreCase = True reg.Global = True reg.Pattern = pattern MsgBox(reg.Test(str)) //–> </SCRIPT>

但是这样必须包含”_”否则就会输出falsh

要求的效果为出现两个“_”才false,并且没有“_”的情况下也是true

<SCRIPT LANGUAGE=”VBScript”> <!– Dim re,str,temps Set re=new RegExp re.IgnoreCase =true re.Global=True str=”a_” re.Pattern=”^[a-z][^_]*_[^_]*$”:str=re.Test(str) temps=str MsgBox(temps) set re=Nothing //–> </SCRIPT> <SCRIPT LANGUAGE=”VBScript”> <!– Dim re,str,temps Set re=new RegExp re.IgnoreCase =true re.Global=True str=”ad” re.Pattern=”^[a-z][^_]*_[^_]*$”:str=re.Test(str) temps=str MsgBox(temps) set re=Nothing //–> </SCRIPT>

本文刊载的所有内容，包括文字、图片、音频、视频、软件、程序、以及网页版式设计等部门来源于互联网，版权均归原作者所有！本网站提供的内容服务于个人学习、研究或欣赏，以及其他非商业性或非盈利性用途，但同时应遵守著作权法及其他相关法律的规定，不得侵犯本网站及相关权利人的合法权利。
联系信息：邮箱aoxolcom@163.com或见网站底部。

THE END