在 VB 6.0 中如何使用 RegEx ?
这个类好像 只有 .net 中才有， vb 6.0 只有 RegExp
但是我需要获得分组匹配的内容，
比如 利用正则式： "([\d]{4})-[\d]{2}-[\d]{2}" 从字符串：“ 我女朋友的生日是：1983-11-12”
中获得年份
问题点数：20、回复次数：4Top
1 楼alee201（alee）回复于 2005-04-01 20:43:34 得分 0
另外，vb 中能不能使用 perl 风格的正则表达式，那个用起来比较顺手Top
2 楼alee201（alee）回复于 2005-04-03 20:52:44 得分 0
dingTop
3 楼bdhh（Silent）回复于 2005-04-03 22:20:44 得分 20
'引用Microsoft VBScript Regular Expressions 5.5
Dim s As String
Dim p As String
Dim reg As RegExp
Dim mc As MatchCollection
Dim m As Match
Dim sms As SubMatches
Dim i As Long
s = "我女朋友的生日是：1983-11-12"
p = "([\d]{4})-([\d]{2})-([\d]{2})"
Set reg = New RegExp
reg.Pattern = p
Set mc = reg.Execute(s)
For Each m In mc
MsgBox m.Value
Set sms = m.SubMatches
For i = 0 To sms.Count - 1
MsgBox sms.Item(i)
Next i
Set sms = Nothing
Next m
Set mc = Nothing
Set reg = NothingTop
4 楼alee201（alee）回复于 2005-04-04 12:35:26 得分 0
谢谢 bdhh(Silent) ， 正是我要的答案 :)Top
