Mahlzeit,
folgendes Problem, ich schreibe in eine List(of String) per InputBox eine Überschrift und über eine Textbox in eine andere List(of String) einen normalen Text, dieser Text wird wiederum in einer .txt Datei gespeichert, dies passiert auch gleichzeitig damit beide den gleichen Index haben. Möchte ich diese .txt Datei nun über meinen löschen Button löschen, wird die Datei auch gelöscht, allerdings wollen meine Schleifen nicht wirklich den "dazugehörigen" Index in den List(of String) löschen. In dem momentanen Stand werden 2 Überschriften aber kein Text gelöscht.
schönes Wochenende!
folgendes Problem, ich schreibe in eine List(of String) per InputBox eine Überschrift und über eine Textbox in eine andere List(of String) einen normalen Text, dieser Text wird wiederum in einer .txt Datei gespeichert, dies passiert auch gleichzeitig damit beide den gleichen Index haben. Möchte ich diese .txt Datei nun über meinen löschen Button löschen, wird die Datei auch gelöscht, allerdings wollen meine Schleifen nicht wirklich den "dazugehörigen" Index in den List(of String) löschen. In dem momentanen Stand werden 2 Überschriften aber kein Text gelöscht.
VB.NET-Quellcode
- 'Button zum löschen der ausgewählten Datei in der ListBox
- PublicSub btnTabelleLoeschen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTabelleLoeschen.Click
- 'Schleife um die in der CheckedListBox ausgewählte Datei zu löschen
- ForEach sDatei AsFileInfoIn lbTabelle.CheckedItems
- If String.Compare(sDatei.ToString, sTabellenUeberschrift) = True Then
- System.IO.File.Delete(Path.Combine(sThemenpfad, sDatei.ToString))
- For x AsInteger = 0 To listAusgabeUeberschrift.Count - 1
- listAusgabeUeberschrift.Remove(x)
- Next
- For y AsInteger = 0 To listAusgabeText.Count - 1
- listAusgabeText.Remove(y)
- Next
- Else
- MsgBox("GEHT NICHT")
- EndIf
- Next
- 'Aufruf der Methode um die CheckedListBox zu aktualisieren
- CrbFuellen()
- EndSub
schönes Wochenende!
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Sportline“ ()