VB怎么截取两个不同字符串中的内容

[qq_42965686]

例如截取一个网页div里的内容，假设div里面有个li列表，再把li里面的内容和每个属性内容分别截取下来

[qq_42965686]

就是这种的，截取大div里的a属性，但是div只能通过设置里面class属性来判断截取的第一个和后面的div（每个class属性不一样没有规律而且里面也有很多的div）

[qq_42965686]

[双辽]

Dim h1 As HtmlElement
Dim h2 As HtmlElement
Dim str As String
h1 = WebBrowser1.Document.GetElementsByTagName("div")(0)‘截取网页div
For i As Int16 = 0 To h1.GetElementsByTagName("li").Count - 1
h2 = h1.GetElementsByTagName("li")(i)
str = h2.InnerHtml’把li里面的内容和每个属性内容分别截取下来
str = h2.GetAttribute("name")’把li里面的内容和每个属性内容分别截取下来
Next

[双辽]

如果不明白，可以把问题写的具体些，

[现在还是人类]

你可以看看我这两篇文章 VB用XML实现在线翻译范例 VB分析超过64K的网页内容（基于XMLHTTP和字节数组处理）

[无·法]

根据规律然后写代码，会正则的话可以事半功倍。