主题：请教：如何获取htm文件中的表格数据到狐表？

 用下面的代码。

Dim web As New System.Windows.Forms.WebBrowser()
web.Navigate(ProjectPath & "aa.htm" )
Do Until web.ReadyState = 4
    Application.DoEvents
Loop

Dim elems As object = web.Document.body.GetElementsByTagName("table")
Dim trs As object = elems(2).GetElementsByTagName("tr")
For i As Integer = 0 To trs.count - 1
    output.show("第" & i & "行")
    Dim tds As Object = trs(i).GetElementsByTagName("td")
    For j As Integer = 0 To tds.count - 1
        output.show("(" & i & "," & j & ")=" & tds(j).InnerText)
    Next
Next