我想取出后显示在自己作的浏览器标题上

解决方案 »

  1.   

    Option ExplicitPrivate Sub Form_DblClick()
     Me.WebBrowser1.Navigate "sohu.com"
    End SubPrivate Sub Form_Load()
     WebBrowser1.Navigate "www.csdn.net"
    End SubPrivate Sub WebBrowser1_TitleChange(ByVal Text As String)
      Debug.Print Text
    End Sub
      

  2.   

    哦,你这个程序时可以取得的,可在我的程序里不行啊,我是程序创建的一个browser组。我都是这么调用的
     WebPage(i).Navigate "http://127.0.0.1/u2/page.asp"你下面这个过程Private Sub WebBrowser1_TitleChange(ByVal Text As String)
      Debug.Print Text
    End Sub我改成了Private Sub WebPage_TitleChange(ByVal Text As String)
      Debug.Print Text
    End Sub就出错了WebBrowser没有什么相关的属性吗?