[已解决]VBA 正则█ .Pattern = "^.{4,8}(?=.*\d)$ 为何不对?

砂海

例：验证密码，条件是4-8位，必须包含一个数字

.Pattern = "^(?=.*\d).{4,8}$ 这样可以

.Pattern = "^.{4,8}(?=.*\d)$    为何 这样不可以
.Pattern = "^.{4,8}(?=.*\d.*)$  也不行

求真相.

最佳答案

月排行榜 / 总排行榜

心不再流泪

2016-2-13 23:33

(?=.*\d)$
你是肯定没有真正理解零宽断言，正向预查不消耗字符，但是你必须得满足断言的要求
(?=.*\d)代表匹配字符串由0至多个任意字符+一个数字组成，但真正的后面你却直接跟了$,能匹配才是怪了
(?=.*\d)as2$这就满足要求了
给你举个例子  (?=a)b        (?=a)代表后面出现的第一个字符必须为a,但真正的却跟了b.要要后面紧跟a,又要跟b,哪能满足
(?=a)a  这样才是对的

跳转到最佳答案楼层

心不再流泪

(?=.*\d)$
你是肯定没有真正理解零宽断言，正向预查不消耗字符，但是你必须得满足断言的要求
(?=.*\d)代表匹配字符串由0至多个任意字符+一个数字组成，但真正的后面你却直接跟了$,能匹配才是怪了
(?=.*\d)as2$这就满足要求了
给你举个例子  (?=a)b        (?=a)代表后面出现的第一个字符必须为a,但真正的却跟了b.要要后面紧跟a,又要跟b,哪能满足
(?=a)a  这样才是对的

砂海

心不再流泪 发表于 2016-2-13 23:33
(?=.*\d)$
你是肯定没有真正理解零宽断言，正向预查不消耗字符，但是你必须得满足断言的要求
(?=.*\d)代表 ...

新年好.


"零宽" 似乎 明白了.
-----------------
(?=.*\d)as2$
--------------------上面这句又糊涂了, 这句 在VBA中 测试结果不对.
求解.
以下为源程序.
--------------------
   '例：验证密码，条件是4-8位，必须包含一个数字
      Sub t355()
        Dim regex As New RegExp
        Dim sr, mat, m
        sr = "A8ayaa"
        With regex
          .Global = True
           .Pattern = "^(?=.*\d).{4,8}$"
            Set mat = .Execute(sr)
            For Each m In mat
              Debug.Print m
            Next m
        End With
      End Sub

心不再流泪

(?=.*\d)as2$
这是我举例不对，
我只是想表达as2满足(?=.*\d)这样的条件
(?=.*\d)as2$  其实就是as2$

砂海

心不再流泪 发表于 2016-2-14 10:25
(?=.*\d)as2$
这是我举例不对，
我只是想表达as2满足(?=.*\d)这样的条件

    {:3512:}{:3512:}{:3512:}