框架内的所有网叶下完.

解决方案 »

  1.   

    Private Sub WebBrowser1_DownloadComplete()End Sub这个会触发的
      

  2.   

    http://support.microsoft.com/support/kb/articles/q180/3/66.asp
      

  3.   

    DocumentComplete事件的发生并不一定意味着当前页面已被全部调入。如果页面上没有其它子框架(frames),发生DocumentComplete事件即表明当前页面(即主框架)已完成调入;若页面上有多个框架,则每个框架完成时都会发生DocumentComplete事件;当所有子框架都完成后,主框架最后产生一次DocumentComplete事件。为了判断出这最后一次DocumentComplete事件,需要比较每次事件发生时的对象(pDisp)是否是WebBrowser控件对象本身:
    Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
        If (pDisp Is WebBrowser1.Object) Then  ' 判断当前网页是否全部调入完毕
            Debug.Print "Document is finished loading."
        End If
    End Sub