VB web瀏覽器跨接入

Question

<div id="Fruits" class="item"> 
<table> 
<tbody><tr> 
<td class="header">Category</td> 
<td class="text"> 
<span id="aaaaa" class="Name"><a href="" rel="category tag">Apple</a></span> 

<span id="bbbbb" class="Name"><a href="" rel="category tag">Orange</a></span> 

<span id="ccccc" class="Name"><a href="" rel="category tag">Melon</a></span> 

<span id="ddddd" class="Name"><a href="" rel="category tag">Banana</a></span> 

<span id="ddddd" class="Name"><a href="" rel="category tag">Watermelon</a></span> 

<td class="icon"></td> 
</tr> 
</tbody></table> 
</div> 

我想獲得「蘋果」，「橙色」，「甜瓜」，「香蕉」，「西瓜」通過VB web瀏覽器，但是當我使用的代碼

WebBrowser2.Document.GetElementById("Fruits").GetAttribute("innerText") 

我AppleOrangeMelonBananaWatermelon

是否有可能獲得像單獨或者他們有一個逗號

之間

蘋果，橙，西瓜，香蕉，西瓜

在此先感謝

Answer 1

我可以給你一個替代方案，使用xPath語法。我不知道你是否可以使用帶有「webBrowser」對象的xPath，但這是一個完整的選擇。我希望這可以幫助你。

Private Sub stackOverflowExample() 

    Dim client As WebClient = New WebClient() 
    Dim lnk As String = "http://www.example.com" 

    Try 

     Dim html = client.DownloadString(lnk) 
     Dim htmlDoc As New HtmlAgilityPack.HtmlDocument() 
     htmlDoc.LoadHtml(html) 

     For Each node As HtmlNode In htmlDoc.DocumentNode.SelectNodes("//span[@id='fruits']") 
      ' get inner html ---> node.InnerHtml 
     Next 

    Catch ex As Exception 

    End Try 

End Sub