Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Print "dffffffffff"
End Sub窗体只有上面这三句代码,运行就输出两行字符串;
为什么都没有连接网页这个事件就被执行呢?
有什么方法可以让解决吗?

解决方案 »

  1.   

    Private Sub Form_Load()
    WebBrowser1.Navigate ""
    End SubPrivate Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Me.Show
    Print "dffffffffff"
    End Sub
    这样可以出现你说的现象,去掉Me.Show只输出一行,去掉
    Private Sub Form_Load()
    WebBrowser1.Navigate ""
    End Sub
    就没输出
      

  2.   


    真的,我把Print "dffffffffff" 这句改成
    Print WebBrowser1.LocationURL
    发现首先输出空字符,然后再输出 "http:///"
    不知道有没方法可以让初始运行时不执行DocumentComplete事件.
      

  3.   

    问题解决了,我以文本方式打开frm文件,,发现里面有这样一句:
    Location        =   "http:///"
    这句是vb自动帮我生成的,不知道是不是版本问题。我用的是VB6