(a|A)href=(.*?[\u4e00-\u9fa5]{8,19}.*?)(a|A)
10年积累的成都网站设计、网站制作经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计制作后付款的网站建设流程，更有通川免费网站建设让你可以放心的选择与我们合作。
在需要提取的部分加上正反括号进行匿名分组，
然后用$2获取该匿名分组就可以了
或者可以做命名分组，
MatchCollection
Dim IsMatch As Boolean = Regex，如何将SearchPattern中的指定的 那个三个小括号对应的内容即SubMatches(0)=".RegularExpressions.Groups(0);) ！
For Each Mt In Matchs
On Error Resume Next
S = S Macth; Publi" SubMatches(2)=".RegularExpressions; SubMatches(1)=".Matches("，提取不出来呢;Chin".RegularExpressions.Regex(SearchPattern)
Dim Matchs As System;China Public National".+)"？
我用如下 ; 提取出来呢.Text.Regex
Regex = New System; National".IsMatch(StrForSearch)
Matchs = Regex.+)c(，执行了此句之后;(.Text.Text.+)a(;
Dim Regex As System比如正则表达式为
SearchPattern="，具体解决方案如下：
解决方案1：
在这之后的字符会显示不出来.RegularExpressions.Regex(SearchPattern)
Dim Matchs As System;Groups集合索引从0开始.Item(i)，但是第一项是完整匹配项，这个是字符串的结束标记.+)c(，接下去才是子项
S = S .Text;"Dim IsMatch As Boolean = Regex.RegularExpressions，但是不要用Chr(0).Regex
Regex = New System;China Public National".RegularExpressions.Value vbcrlf
Next
也是可以的;
With Matchs; ".Count - 1 '.Text.MatchCollection
'.+)".IsMatch(StrForSearch)
Matchs = Regex：
For Each Mt In Matchs.groups
S = S Mt.Item(0);
Next
End With
MsgBox(S)
你的循环改成.Matches(")
Dim S As String = "
Dim Regex As System.Item(0).Value "Dim SearchPattern As String = ".Text.Groups
For i As Integer = 1 To ;(.+)a(
提问者评价
多谢指教！
解决方案2：
Dim SearchPattern As String = "(.+)a(.+)c(.+)"
Dim Regex As System.Text.RegularExpressions.Regex
Regex = New System.Text.RegularExpressions.Regex(SearchPattern)
Dim Matchs As System.Text.RegularExpressions.MatchCollection
'Dim IsMatch As Boolean = Regex.IsMatch(StrForSearch)
Matchs = Regex.Matches("China Public National")
Dim S As String = ""
With Matchs.Item(0).Groups
For i As Integer = 1 To .Count - 1 'Groups集合索引从0开始，但是第一项是完整匹配项，接下去才是子项
S = S .Item(i).Value " "
Next
End With
MsgBox(S)
解决方案3：
Dim matches As MatchCollection = rx.Matches("(.*)")
VB中()通常是方法、过程或者函数用来引用参数用的，如果()是空的，表示该方法、过程或者函数没有引用参数，尽管如此，()还是必需带上。而Me.hide()这个是窗体自我引用hide方法也就是隐藏这个窗体方法。此方法没有引用参数.
加方括号就表示不是一个关键字
经常看到有的代码中Byte、 String 、Object 加上方括号，就是为防止编译器把他们误认为是关键字。在sql中也会经常看到
你理解时可以不用理会，[Byte]() 就是Byte()
dim bytesSent() as Byte 是声明一个没有给定下标的数组
dim bytesReceived(255) as Byte 是声明了一个有下标的数组
Dim input = "123abc456def"
Dim reg As New Regex("abc(\d*)")
Dim A As String = reg.Match(input).Groups(1).Value
Console.WriteLine(A) '456
Console.ReadLine()
说VB中不用大括号是不对的，说VB中常用大括号也是不对的，这要看具体场合。
比如 SendKeys 函数在调用按键时就要用到大括号，这时大括号中传递的就是按键参数。例如：SendKeys ""这句就模拟了回车按键。而在其他场合下一般是用不到的。
注：大括号在 C/C++/C# 等语言中是经常使用的。
请参考