Dim ex
ex = "^[013]*$"
Dim regEx
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True
regEx.Pattern = ex
dim flag
flag = regEx.Test(你要检测的字串)
ex = "^[013]*$"
Dim regEx
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True
regEx.Pattern = ex
dim flag
flag = regEx.Test(你要检测的字串)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货