Hey Leute ,
ich habe ein Problem und zwar wird die Document_Completed Funktion nicht ausgeführt.Ich habe ein Neuer Tab Funktion dort wird sie als Handler hinzugefügt.
Mein Code
So wird sie als Handler hinzugefügt
Ich habe keine Compiler Fehler. Die Funktionen sind jeweils in einer Klasse wo sie aufgerufen werden. Option Strict ON bekomme ich dies als Fehler wie in diesen Thread von mir.
Ich hoffe ihr könnt mir helfen.
ich habe ein Problem und zwar wird die Document_Completed Funktion nicht ausgeführt.Ich habe ein Neuer Tab Funktion dort wird sie als Handler hinzugefügt.
Mein Code
VB.NET-Quellcode
- Public Shared Function WebBrowserDocument_Completed(ByVal sender As Object, ByVal e As Skybound.Gecko.GeckoProgressEventArgs) As String
- If CType(tabcontrol1.SelectedTab.Controls.Item(0), Skybound.Gecko.GeckoWebBrowser).CanGoBack Then
- zurück.Enabled = True
- Else
- zurück.Enabled = False
- End If
- If CType(Tabcontrol1.SelectedTab.Controls.Item(0), Skybound.Gecko.GeckoWebBrowser).CanGoForward Then
- Zurück.Enabled = True
- Else
- Zurück.Enabled = False
- End If
- Stop.Enabled = False
- Status.Text = "fertig"
- progressbar1.Visible = False
- Dim browser As Skybound.Gecko.GeckoWebBrowser = DirectCast(sender, Skybound.Gecko.GeckoWebBrowser)
- Dim DocumentTitle As String = DirectCast(Tabcontrol1.SelectedTab.Controls.Item(0), Skybound.Gecko.GeckoWebBrowser).DocumentTitle
- If (DocumentTitle.Length > 20) Then
- DocumentTitle = DocumentTitle.Substring(0, 30)
- Tarayıcı.Parent.Text = (DocumentTitle & "...")
- Else
- Tarayıcı.Parent.Text = Tarayıcı.DocumentTitle
- End If
- Me.Text = (Tarayıcı.DocumentTitle & " - browser")
- Suchbox.Text = CType(Tabcontrol1.SelectedTab.Controls.Item(0), Skybound.Gecko.GeckoWebBrowser).Url.AbsoluteUri
- End Function
So wird sie als Handler hinzugefügt
Ich habe keine Compiler Fehler. Die Funktionen sind jeweils in einer Klasse wo sie aufgerufen werden. Option Strict ON bekomme ich dies als Fehler wie in diesen Thread von mir.
Ich hoffe ihr könnt mir helfen.