Visual Basics Save/Speicher Button

[cheathacker]

Hi Leute,
Hab gerade bissel Langeweile und dachte mir ich mach mal ne Urlaubsliste, von den Sachen die ich mitnehmen will. Hab mir also ein Visual Basics Projekt Geöffnet und losgelegt:
Zuerst hab ich eine CheckedListBox erstellt und die Sachen reingeschrieben, um sie später abhaken zu können. Jetz is mir in den Sinn gekommen, wenn ich das Programm schließe, sind die Haken wieder weg und ich muss wieder alles neu abhaken. Dachte ich mir, machste dir nen Speicher und nen Lösch Button, was sich aber als nicht so einfach herausstellte...
Ich hab versucht zu schreiben:

PHP Code:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        CheckedListBox1.CheckedItems.save()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        CheckedListBox1.CheckedItems.clear()
    End Sub
End Class 


Ich hab geschrieben .CheckedItems , weil ich ja nur will, dass man die gesetzten Haken Speichern oder Löschen kann.

So ich denke, das Problem ist ausführlich genug beschrieben, würde mich für Hilfe sehr bedanken.

MfG Patrick

[Killerzwerg829]

[Aimless Angel]

~moved~

[P-a-i-n]

mußt du speicher mit einer ini,xml oder my.settings

[xmanix]

auch laden?

Also der Code zum Speichern sollte sein:

Using sw = New IO.StreamWriter("Einstellungen.txt")
For Each x As String In CheckedListBox1.Items
sw.WriteLine(x + ";" + CheckedListBox1.CheckedItems.Contains(x).ToString( ))
Next
End Using

[cheathacker]

Ich hab den Code kopiert und benutz, wenn ich dann das Programm öffne, ein par Häkchen setze und dann auf den Speicher Button gehe, drücke ich auf Schließen, mache es wieder auf und es wurde leider nicht gespeichert.

[xmanix]

ok du brauchst also auch die funktion zum laden^^

moment mal schreiben

Edit:

Hier der Code:

CheckedListBox1.Items.Clear()
Using sr = New IO.StreamReader("Einstellungen.txt")
While Not sr.EndOfStream
Dim line = sr.ReadLine.Split(";")
CheckedListBox1.Items.Add(line(0))
CheckedListBox1.SetItemChecked(CheckedListBox1.Ite ms.IndexOf(line(0)), Boolean.Parse(line(1)))
End While
End Using

[cheathacker]

Danke hat geklappt, auch wenn man das Programm schließt und wieder öffnet
*Thanks*

[19panos19]

cheat you to thanks