主题：【已解决】（获取网页表格内容保存狐表、获取字符串组内指定位置的字符串）[求助]我想获取表格内容到狐表表A内，怎么写？

参考

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=49278&skin=0

那你就改成

Dim elems As object = web.Document.GetElementsByTagName("table")

msgbox(elems.count)

msgbox(elems(0).innerHTML)

你只需要循环每一个tr和td就可以啊，不需要照抄人家的代码啊，你弹出各个td的值看看；

不会做，请把你的网页，另存一下。单独做一个项目，引用这个网页。发上来测试。

Dim web As System.Windows.Forms.WebBrowser = forms("窗口1").controls("webbrowser1").Basecontrol
Dim elems As object = web.Document.GetElementsByTagName("table")
'msgbox(elems(0).Innertext)
Dim trs = elems(0).GetElementsByTagName("tr")
For i As Integer = 1 To trs.count-1
    Dim tr = trs(i)
    Dim tds = tr.GetElementsByTagName("td")
    msgbox(tds(0).Innertext)
    msgbox(tds(1).Innertext)
    msgbox(tds(2).Innertext)
Next