调用WebBrowser控件中的指定的内容
创建一个webbrowser对象变量 web
Dim web As New System.Windows.Forms.WebBrowser() '建立一个web变量,为 WebBrowser型变量
让对象工作就绪:
web.ScriptErrorsSuppressed = True
Do Until web.ReadyState = 4 ’Complete 4 该控件已加载完新文档及其所有内容。
Application.DoEvents
Loop
创建一个DOM对象 【DOM对象 DOM元素 DOM元素的内容】
Dim Doc = web.Document
获得指定的ID的DOM元素
Dim cs As syswin.htmlelement = Doc.getelementbyid("cs")
获得指定的ID的DOM元素的文本:
output.show(cs.innertext) '显示当前DOM元素的内部文本
output.show(cs.OuterText) '显示当前DOM元素的内部文本
output.show(cs.OuterHtml) '显示当前DOM元素(含自身)的Html代码
output.show(cs.InnerHtml) '显示当前DOM元素(不含自身)的Html代码
核心语句:Dim cs As syswin.htmlelement = Doc.getelementbyid("cs") 请参考,看看能不能获取指定的src