Hallo Com.
Meine Frage ist folgende:Ich habe in einer Form ein Webbrowser-Element (siehe Bild)
und in einer anderen Form unter einem Tabcontrol eine Listbox (siehe Bild) die die aufgerufenen Seiten(also einen Verlauf)anzeigen
soll:Bis jetzt habe ich es mit dem Code unten (und etwas änlichen (Webbrowser1.AbsoluteUri)) versucht aber es funktioniert nicht.
Was habe ich falsch gemacht bzw. wo steckt der Fehler?
Meine Frage ist folgende:Ich habe in einer Form ein Webbrowser-Element (siehe Bild)
und in einer anderen Form unter einem Tabcontrol eine Listbox (siehe Bild) die die aufgerufenen Seiten(also einen Verlauf)anzeigen
soll:Bis jetzt habe ich es mit dem Code unten (und etwas änlichen (Webbrowser1.AbsoluteUri)) versucht aber es funktioniert nicht.
Was habe ich falsch gemacht bzw. wo steckt der Fehler?
VB.NET-Quellcode
- Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
- Try
- If e.KeyCode = Keys.Enter Then
- Me.Text = "Connecting..."
- My.Settings.verlauf = My.Settings.verlauf & WebBrowser1.Url.AbsolutePath
- Me.Cursor = Cursors.WaitCursor
- WebBrowser1.Navigate(TextBox1.Text)
- Application.DoEvents()
- Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
- Application.DoEvents()
- Loop
- WebBrowser1.Refresh()
- Me.Text = WebBrowser1.Url.AbsoluteUri
- Me.Cursor = Cursors.Arrow
- End If
- Catch
- Me.Text = "aqua Oops die Seite konnte nicht geladen werden..."
- My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Exclamation)
- MsgBox("aqua konnte keine Verbindung zum Internet herstellen", MsgBoxStyle.Critical)
- End Try
- End Sub