以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]抓取网页问题？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101772)
--  作者：dqlgood
--  发布时间：2017/6/6 21:49:00
--  [求助]抓取网页问题？
Dim web As new System.Windows.Forms.WebBrowser
web.ScriptErrorsSuppressed = True
web.Navigate("http://www.sooxue.com/college/score/23")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
For Each tr As object In web.Document.GetElementById("scoreTable").GetElementsByTagName("tr")
    Dim tds = tr.GetElementsByTagName("td")
    For j As Integer = 0 To tds.count - 1
        output.show(tds(j).innerText)
    Next
Next
默认：北京市、本科提前批、文理综合

 

如选择：重庆市、本科第一批、理科


如何处理？谢谢！