正则表达式入门与提高---VBA平台的正则学习参考资料

洛奇奇

学习了，mark~~

檬然心动

VBA初学者，学习了。

tianxialaosan

收藏一下，回去慢慢消化。

23号人生

收藏，整理，打印，学习中。。。

daveman

liu-aguang 发表于 2014-6-15 13:49
六.    回溯与效率    NFA中的回溯是一个好东西，可以为正则表达式带来更多的功能，它也是很多正则引擎 ...

  有时不小心使用量词,则可能带来灾难性的后果.
    现在我们用下面正则表达式
    \d+
   匹配目标文本
    123456X、

和这个匹配灾难性结果？？？你说笑话吗？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？

ljb600078

谢谢楼主无私奉献，学习学习

H77

谢谢分享,收藏了

ykqrs

好贴！最近每天晚上都在读这个帖子，连续6晚

穿梭机丶Edward

liu-aguang 发表于 2014-6-11 15:38
四.正则元字符----字符(串)连续出现次数表示法  
  上一章介绍表示字符的元字符或序列都只代表一个字符. ...

弄了很久。用于可以精确匹配到科室名了。  科室:([\u4e00-\u9fa5]+)

穿梭机丶Edward

liu-aguang 发表于 2014-6-11 15:57
五.正则元字符—-字符(串)位置表示法
  正则提供了一些表示位置元字符(序列),它可以锚定特定字符(串),有 ...

或许用这个代码，更好理解\b与\B

1. Sub test()
   
2.   Dim s$, s1 As String, s2 As String, s3 As String
   
3.   s = "He captured a catfish for his cat"
   
4.   With CreateObject("vbscript.regexp")
   
5.     .Global = True
   
6.    
   
7.      .Pattern = "\bcat\b"    '分别用上面两个表达式测试
   
8.      s1 = .Replace(s, "Fat")
   
9.    
   
10.      .Pattern = "cat"
    
11.      s2 = .Replace(s, "fAt")
    
12.      
    
13.      .Pattern = "\bcat\B"
    
14.     s3 = .Replace(s, "FAT")
    
15.   End With
    
16.   
    
17.   MsgBox "s1:" & s1 & vbCrLf & "s2:" & s2 & vbCrLf & "s3:" & s3
    
18. End Sub

复制代码