向高手提取网址链接正则？解决方案

向高手提取网址链接正则？
求VB提取网页中的链接
  匹配为
      href=xxxxxx> xxxx </a> xxxxx <a

      就是从href开始，到下个href之前的字符串

------解决方案--------------------
就是从href开始，到下个href之前的字符串
-----------------------------------------
用split对href分组不就行了
------解决方案--------------------
xxxxxx> xxxx </a> xxxxx <a
\w*[\u4e00-\u9fa5]*\s*> \w*[\u4e00-\u9fa5]*\s* </a> \w*[\u4e00-\u9fa5]*\s*> <a
------解决方案--------------------
回vbman2003(家人）
如何分组
----------------------------------------------
比如：
dim s as string
s= "href=xxxxxx> xxxx </a> xxxxx <a "
s=split(s, "href ")(1)

然后根据你的具体要求处理一下s就可以了