下面是网页源代码中的一部分
<table width="680">
<tr>
<td height="35">
<h3>
<a href="http://toutiao.com/item/6283004838989005313/" target="_blank" ga_event="source_url" ga_label="index_feed" >关注|“司法考试”将更名为“法律职业资格考试”考试难度有所上升</a></h3>
</td>
</tr>
<tr>
<td>
<div style="float:left; max-height:180px; overflow:hidden; margin-right:10px" class="img_bg shadow_img">
<a target="_blank" href="http://toutiao.com/item/6283004838989005313/" ga_event="source_url" ga_label="index_feed"><img src="http://p2.pstatp.com/list/5c40008f9d353ab6875" width="202" />
</a>
</div>
<div class="text">2016-05-09 贵州检察来源 | 山东省人民检察院微信公众号“司法考试”更名为“法律职业资格考试”的法治意义“司法考试”将更名为“法律职业资格考试” 标志着法律职业共同体的真正形成一、“司法考试制度”到“国家统一法律职业资格考试制度”,标志法律职业共同体将真正形成中共中央办</div>
<div class="clearfix"></div>
</td>
</tr>
<tr>
<td>
<table class="item_info" width="100%">
<tr>
<td>阅读: 194</td>
<td>评论: 0</td>
<td align="right">2016-05-10 16:46</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</div>
经过在命令窗口中运行如下:
Dim web As new System.Windows.Forms.WebBrowser
web.Navigate("http://toutiao.com/m6051259851/")
Do Until web.ReadyState = 4
Application.DoEvents
Loop
Dim bt As System.Windows.Forms.HtmlElement
bt = web.Document.GetElementByID("keywords") '今日头条单位标题
Output.Show(bt.innerText & " " & bt.GetAttribute("content"))
Dim jj As System.Windows.Forms.HtmlElement
jj = web.Document.GetElementByID("description") '今日头条单位简介
Output.Show(jj.innerText & " " & jj.GetAttribute("content"))
Dim bt1 As System.Windows.Forms.HtmlElement
bt1 = web.Document.GetElementByID("pin-content") '
Output.Show(bt1.innerText & " " & bt1.GetAttribute("href")) 这个部分的代码不起作用 是不是ID元素错误啦
运行报错
此主题相关图片如下:30c2.tm.png
求解决错误
并获取下列红色框中数据
此主题相关图片如下:c15f.tm.png