看板Programming
标 题请问这是VB 6.0的语法吗？
发信站交大资科_BBS (Mon Nov 13 22:43:47 2006)
转信站ptt!ctu-reader!ctu-peer!news.nctu!news.cis.nctu!cis_nctu
请问各位先进
我想要用VB来写有关Regular Expression的处理
结果找到如下程式码：
看起来满像是VB的，但是放在VB6.0当中，第一行Dim就红字了
其中Dim r As Regex = new Regex(pat, RegexOptions.IgnoreCase)
也有问题，所以想请问我找到的语法是for VB的吗？
另外，能否提供一下VB关於Regular Expression的范例
Dim text As String = "One car red car blue car"
Dim pat As String = "(\w+)\s+(car)"
' Compile the regular expression.
Dim r As Regex = new Regex(pat, RegexOptions.IgnoreCase)
' Match the regular expression pattern against a text string.
Dim m As Match = r.Match(text)
Dim matchcount as Integer = 0
While (m.Success)
matchCount += 1
Console.WriteLine("Match" & (matchCount))
Dim i As Integer
For i = 1 to 2
Dim g as Group = m.Groups(i)
Console.WriteLine("Group" & i & "='" & g.ToString() & "'")
Dim cc As CaptureCollection = g.Captures
Dim j As Integer
For j = 0 to cc.Count - 1
Dim c As Capture = cc(j)
Console.WriteLine("Capture" & j & "='" & c.ToString() _
& "', Position=" & c.Index)
Next j
Next i
m = m.NextMatch()
End While
--
金戈铁马耀日月 铁骑奔腾撼山岗
--
* Origin: ★ 交通大学资讯科学系 BBS ★ <bbs.cis.nctu.edu.tw: 140.113.23.3>