主题：求助：网页动态加载十行，怎么解析出当前所有行的数据呢？

Dim web As new System.Windows.Forms.WebBrowser
web.ScriptErrorsSuppressed = True
web.Navigate("http://toutiao.com/m6114233861/")

Do Until web.ReadyState = 4 AndAlso web.Document.GetElementById("content-left") IsNot Nothing AndAlso web.Document.GetElementById("content-left").GetElementsByTagName("li").count > 0
    Application.DoEvents
Loop
Dim lis = web.Document.GetElementById("content-left").GetElementsByTagName("li")
DataTables("文章列表").DataRows.Clear
For i As Integer = 0 To lis.count-1
    Dim lsa = lis(i).GetElementsByTagName("a")
    output.show(lsa(0).InnerHtml)
Next

上述代码实现的是十行数据加载，怎么实现所有行数据加载呢？

上述代码实现了文章标题的获取，但是如果需要加载A标签下  class="title-box link" 这个的值 怎么代码中加上呢？

要获取多个文章列表元素下的内容，怎么操作呢？红色框内都是需要显示出来的数据！

此主题相关图片如下：qq图片20161101141837.png

文章列表部分格式如下：

此主题相关图片如下：qq图片20161101141559.png