[已解决]正则内类不匹配

yedeen58

liuguansky 发表于 2014-10-11 09:54
取得AA的效果你试试？

好像不行正则表达示

yedeen58

香川群子 发表于 2014-10-11 15:37
这是原始数据，但是你要提取什么样的结果呢？完全没说！……要靠猜？！

取/后面的数字，有两个/的话取中间的数据

liuguansky

yedeen58 发表于 2014-10-11 16:57
好像不行正则表达示

？？

yedeen58

liuguansky 发表于 2014-10-11 17:11
？？

.Pattern = "/(\d+)(?=/|$)"
这个表达示验证不行，你试可以吗？

yedeen58

ghostjiao 发表于 2014-10-11 08:20
你看看可以不

可以用，但我想用正则表达示不知道那个怎么写？

香川群子

yedeen58 发表于 2014-10-11 17:17
.Pattern = "/(\d+)(?=/|$)"
这个表达示验证不行，你试可以吗？

根据你提供的数据，可以发现规律是需要提取/分开的第2组数值。

方法-1：
.Pattern = "\d+"

方法-2：
.Pattern = "\d+(?=/|$)"

然后、直接提取第2组。
Function f(txt$)
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "\d+"                '方法-1    直接判断数值
       ' .Pattern = "\d+(?=/|$)"    '方法-2   判断跟随/或结尾 的数值
        If .test(txt) Then f = .Execute(txt)(1) '提取第2组数值
    End With
End Function

yedeen58

香川群子 发表于 2014-10-11 23:00
根据你提供的数据，可以发现规律是需要提取/分开的第2组数值。

方法-1：

第一种可行，第二种你有调试过吗，不行呀

liuguansky

yedeen58 发表于 2014-10-11 17:17
.Pattern = "/(\d+)(?=/|$)"
这个表达示验证不行，你试可以吗？

我测试可行……你不用前置/会有可能出错，先前置/再获取分组就可以了。

ppp710715

.Pattern = "\d{1,}"