請問這是VB 6.0的語法嗎?

看板Programming作者時間18年前 (2006/11/14 02:01), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/4 (看更多)
請問各位先進 我想要用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>
文章代碼(AID): #15MBBX00 (Programming)
文章代碼(AID): #15MBBX00 (Programming)