主题：[求助]获取网页表格

支付宝交易详情页面，我需要怎样才能让他导入狐表？

Dim web As System.Windows.Forms.WebBrowser = forms("窗口1").controls("webbrowser1").Basecontrol
Dim elems As object = web.Document.GetElementsByTagName("table")
msgbox(elems(0).Innertext)
ClipBoard.SetText(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)

Next

我要获取这一节内容。红色区域一直是空值。是我写错了吗

---

以下内容是专门发给有点蓝浏览

---

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:支付宝.zip

Next

就红色区域有问题，只有第一个是空值，没有第二个第三个。可是我看一个tr下面有六个td代码

显示成这样
此主题相关图片如下：qq截图20190904113159.png

  </td> 

<td class="name">
       <p class="consume-title" style="visibility: visible;">
                                  <a href="https://consumeprod.alipay.com:443/record/detail/simpleDetail.htm?bizType=TRADE&amp;bizInNo=2019090422001453710519136815&amp;gmtBizCreate=20190904081540" target="_blank" seed="consumeTitle-link" smartracker="on">商品</a>
                    </p>
     
             
                      <p class="name p-inline ft-gray" style="visibility: visible;">
        空心竹 |
                </p>
               
                
                                  <div class="consume-bizNo ft-gray fn-pr J-tradeNo-container  p-inline" id="J-tradeNo-container-1">
       流水号
       
                       <a class="J-tradeNo-copy J-tradeNo" id="J-tradeNo-1" href="javascript:;" data-clipboard-text="2019090422001453710519136815" title="2019090422001453710519136815" seed="JTradeNoContainer1-JTradeNo1" smartracker="on">   2019...815
 </a>
      </div>
    
            
    </td>