Question

vb webbrowser获取网页网址

怎样使VB6.0中WebBrowser的地址改变时（例如点了超连接时），让某一文本框的文本变成改变后的网址？？

Answer 1

假设有一个网页浏览控件WebBrowser1以及一个文本框Text1来显示网址，用以下代码可以解决：
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Text1.Text=URL
End Sub
希望对您有所帮助！

Answer 2

private webbrowser1_documentcomplete()
text1.text=webbrowser1.locationurl
end sub

Answer 3

就在 点了超连接时_click 事件中加入 某一文本框.text 等于 “超链接地址”