Question

VB中WebBrowser控件判断网页全部载入（包括图片）

我想做一个网页抓图工具，指定一个网页链接，程序访问链接并将该网页所有图片保存至本地；求如何判断网页全部载入完成，主要是网页图片；DocumentComplete好像会出点问题 求指点

Answer 1

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
'全部载入，该DocumentComplete事件发生
End Sub

追问

图片好像还没完全载入啊 还有比如说是百度图片搜索出来的 滚动条往下啦 网页页面还会继续加载

追答

Document对象已经完成，没有显示，应该是在缓存里没显示

Private Sub Command1_Click()
WebBrowser1.Navigate "http://image.baidu.com/"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Debug.Print "看看是否完成" '经测试，在立即窗口中，只打印一次
End Sub