網頁內容為:
<div name="abc"><b>測驗</b></div>
<table>
<tr>aaaaaa
<td>bb</td>
<td>cc</td>
</tr>
<tr>dddddd
<td>gg
</table>
VB中的代碼:
Dim mydoc As Object
Private Sub CommandButton1_Click()
WebBrowser1.Navigate "http://127.0.0.1:8080/2.jsp"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Set mydoc = WebBrowser1.Document
'MsgBox mydoc.all(7).outerhtml
Dim i As Integer, xcell As Integer
xcell = mydoc.getElementsByTagName("td").Length
For i = 1 To xcell
MsgBox "asaa"
Next
End Sub
現在我能知道網頁中一共有多少個TD標簽,在回圈中怎么才能把這3個TD標簽里的內容提取出來呢?提取全部標簽內容是mydoc.all(0).outertext,誰知道請幫幫我
uj5u.com熱心網友回復:
for each obj in mydoc.getElementsByTagName("td")debug.print obj.innerhtml
next
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/121739.html
標籤:控件
上一篇:VB呼叫WORD模板列印怎么實作
下一篇:急求vb與單片機串口通信的程式
