Hallo,
Bin neu hier, und hoffe das Thema ist hier richtig.
Aus langerweile habe ich angefangen einen Webbrowser mit VB zu programmieren [schon wieder so ein T r ttel].
Nun wollte ich eine lesezeichen funktion einbauen, in einem Menustrip kann man auf Lesezeichen hinzufügen klicken
dann öffnet sich eine neue Form in der man die url eingeben kann ein klick auf den Ok nimmt das Lesezeichen in den menustrip auf.
Hier der Code beim klicken des Okay Buttons:
Das klappt auch wunderbar, allerdings soll man die Lesezeichen auch löschen können auch dafür gibt es einen Button der eine neue Form öffnet in der eine Combobox vorhanden ist. In der Combobox soll man ein Lesezeichen auswählen können und dann mit einem klick auf Löschen, löschen können. Die Combobox zeigt die Lesezeichen an, und wenn man auf löschen geht verschwinden sie aus der Liste der Combobox, aber im Lesezeichenmenü sind sie immer noch!
Hier mein Code:
Kann jemand mir helfen?
Bin neu hier, und hoffe das Thema ist hier richtig.
Aus langerweile habe ich angefangen einen Webbrowser mit VB zu programmieren [schon wieder so ein T r ttel].
Nun wollte ich eine lesezeichen funktion einbauen, in einem Menustrip kann man auf Lesezeichen hinzufügen klicken
dann öffnet sich eine neue Form in der man die url eingeben kann ein klick auf den Ok nimmt das Lesezeichen in den menustrip auf.
Hier der Code beim klicken des Okay Buttons:
Das klappt auch wunderbar, allerdings soll man die Lesezeichen auch löschen können auch dafür gibt es einen Button der eine neue Form öffnet in der eine Combobox vorhanden ist. In der Combobox soll man ein Lesezeichen auswählen können und dann mit einem klick auf Löschen, löschen können. Die Combobox zeigt die Lesezeichen an, und wenn man auf löschen geht verschwinden sie aus der Liste der Combobox, aber im Lesezeichenmenü sind sie immer noch!
Hier mein Code:
Quellcode
- Private Sub lese_remove_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- For Each item As String In My.Settings.Bookmark
- ComboBox1.Items.Add(item)
- Next
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- ComboBox1.Items.Remove(ComboBox1.SelectedItem)
- My.Settings.Bookmark.Add(ComboBox1.Text)
- Form1.Favs.DropDownItems.Add(ComboBox1.Text)
- My.Settings.Save()
- End Sub
Kann jemand mir helfen?