Alguna forma de capturar url en WebBrowser?(solucionado)

[Senior++]

Pues buscando por internet me encontré esto, tambien busque por internet y lo que encontré es validar URL y eso no tiene nada que ver

Código [Seleccionar] Expandir

Dim Url As String
 Url="www.google.com."
 webbrowser.Navigate Url
 text1.text=Url

Pero no es lo que quiero... ya que por ejemplo cuando entre a otra página desde google no se que da la url de esa página si no que sigue www.google.com

osea lo que yo quiero es que en cada página que visite en el webbrowser pues salga la url en el text...

Saludos

[x64core]

yo nose porque a varia gente le gusta usar ese apestoso control web browser
pero bueno usa DDE

[seba123neo]

Código [Seleccionar] Expandir

Dim Url As String
  Url="www.google.com."
  webbrowser.Navigate Url
  text1.text=Url

eso que haces no tiene logica, fijate estas asignado siempre el mismo valor, por eso no te cambia.

para eso debes usar los eventos de webbrowser, por ejemplo:

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
    WebBrowser1.Navigate "http://www.google.com.ar"
End Sub

Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
    Me.Caption = URL
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Me.Caption = URL
End Sub

probalo, y navega a las paginas que quieras y siempre te va a mostrar la URL actual.

saludos.

[Senior++]

Muchas gracias duda solucionada