求vb中这样的正则表达式的写法
在已经提取的html代码用正则把超连接与包含在 <a> 与 <font> 里的字符匹配出来？
如： <a href= "http://www.haining.gov.cn/ " target= "_blank "> <font size= "3 "> 中国海宁 </font> </a>
匹配后的结果为 http://www.haining.gov.cn 中国海宁
，看过一些c#的，，但是在vb里都不太好用。希望高手指点
[解决办法]
Function ReplaceTest(patrn, replStr)
Dim regEx, str1 ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分大小写。
ReplaceTest = regEx.Replace(text3.text, replStr) ' 作替换。
End Function
call ReplaceTest( <a href= "(.*?) "[^> ]*> | <[^> ]*> , "$1 ")
