Guten Tag,
Ich möchte gern ne funktion schreiben wo dass Programm alle Tabs durchgeht und in den Tabs ist ein Webbrowser und die URl soll gepsiehcert werden, aber er findet immer nur die Listbox und gibt dann einen Fehler aus.
Mein Code:
Oder auch ohne deklarations fehler (komme trotztdem zum gleichen Punkt):
Wie könnte ich das richtig realsieiren
Freue mich über eure Hilfe
Da kommt dann dass System.WIndows.Forms.Listbox nicht in System.Windows.Forms.Webbrowser umgewandelt ewrden kann, aber wie kann ihc das ändern?
mfg
Confix
Ich möchte gern ne funktion schreiben wo dass Programm alle Tabs durchgeht und in den Tabs ist ein Webbrowser und die URl soll gepsiehcert werden, aber er findet immer nur die Listbox und gibt dann einen Fehler aus.
Mein Code:
VB.NET-Quellcode
- If Beenden.ShowDialog = Windows.Forms.DialogResult.OK Then
- Dim bla As Integer = 1
- For Each tbs As Qios.DevSuite.Components.QTabPage In QTabControl1.Controls
- For Each br As Control In tbs.Controls
- If TypeOf br Is WebBrowser Then
- If bla = 1 Then
- My.Settings.Sitzung = br.Url.AbsoluteUri & "|"
- bla = 2
- GoTo 10
- Else
- My.Settings.Sitzung &= br.Url.AbsoluteUri & "|"
- End If
- End If
- 10:
- Next
- Next
- End If
Oder auch ohne deklarations fehler (komme trotztdem zum gleichen Punkt):
VB.NET-Quellcode
- If Beenden.ShowDialog = Windows.Forms.DialogResult.OK Then
- Dim bla As Integer = 1
- For Each tbs As Qios.DevSuite.Components.QTabPage In QTabControl1.Controls
- For Each br As Webbrowser In tbs.Controls
- If bla = 1 Then
- My.Settings.Sitzung = br.Url.AbsoluteUri & "|"
- bla = 2
- GoTo 10
- Else
- My.Settings.Sitzung &= br.Url.AbsoluteUri & "|"
- End If
- End If
- 10:
- Next
- Next
Wie könnte ich das richtig realsieiren
Freue mich über eure Hilfe
Da kommt dann dass System.WIndows.Forms.Listbox nicht in System.Windows.Forms.Webbrowser umgewandelt ewrden kann, aber wie kann ihc das ändern?
mfg
Confix