请问如何查询 text中相似的字符？？并提取出这一行的url
比如我的一个text中是这样 我想找出所有 相似http://news.163.com/07/0414/ 的这个URL 怎么做？？


<li> <a href= "http://news.163.com/07/0414/15/3C24K07H0001124J.html "> 压力话题请您参与 </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24K1JA0001124J.html "> 我国今晨发射一颗北斗卫星(图) </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24JTJ20001124J.html "> 上海16家银行集体承诺改进“排队问题” </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24JGUO0001124J.html "> 广东游客巧遇温总理 </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24JF130001124J.html "> “城市压力病”：带薪休假，想说爱你不容易 </a> <span> 04月14日 15:34 </span> </li>

<li> <a href= "http://news.163.com/07/0414/15/3C24JEB80001124J.html "> “南海Ⅰ号”当年或有女乘客 </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24JCH60001124J.html "> 分析人士提醒：要警惕慢牛变疯牛资产泡沫化 </a> <span> 04月14日 15:34 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C24G9P50001124J.html "> 广州楼价跌一成专家说内情 </a> <span> 04月14日 15:33 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C230MFM0001124J.html "> 职业规划大赛鼓励自主创业 </a> <span> 04月14日 15:06 </span> </li>
<li> <a href= "http://news.163.com/07/0414/15/3C230IDN0001124J.html "> 我国首评白金五星 花园酒店接受公示 </a> <span> 04月14日 15:06 </span> </li>

[解决办法]
先把所有url取出存入字符串数组,然后逐一判定(可以考虑用instr判断,能否用instr在于你 "相似 "的界定)
[解决办法]
那取第一个url会不会？取下一个呢？取最后一个呢？3个中哪个不会？还是都会？或者是单独都会放在一起就不会？。。。。汗，我可以去说绕口令了

不知道你现在是准备怎么取，准备怎么存放，源在哪里。。。只能泛泛告诉你“都取出来，格式化，创建你的匹配策略，过滤所有需要过滤的源，得到结果集”
[解决办法]
给你一个思路，自己完善：

　　Dim s() As String
Dim i As Integer

s = Split(Text1, Chr(34))　　　 '用 "号分组
For i = 0 To UBound(s)
If InStr(s(i), "http://news.163.com/07/0414/ ") Then
Debug.Print s(i)　　　　 '符合条件的取出来
End If
Next