Hi,
ich habe eine Funktion zum speichern von den Einträgen einer ListView geschrieben, damit ich nicht jedes Subitem in einer neuen Array speichern muss, habe ich zwischen den Subitems einen Teiler in Form von einem "$" eingebaut.
Quellcode:
Jetzt möchte ich eine Funktion schreiben, welche dieses Speichersystem öffnen kann, woran ich aber scheitere ist es, den einen Array, welcher durch "$" geteilt ist, wieder in 6 Arryas zu zerlegen.
Kann mir jemand zeigen, wie dies geht?
ich habe eine Funktion zum speichern von den Einträgen einer ListView geschrieben, damit ich nicht jedes Subitem in einer neuen Array speichern muss, habe ich zwischen den Subitems einen Teiler in Form von einem "$" eingebaut.
Quellcode:
VB.NET-Quellcode
- Dim sfd As New SaveFileDialog
- With sfd
- .Filter = "Legionsliste | *.llist"
- .ShowDialog()
- If .FileName.Length >= 3 Then
- Dim sList(50000) As String
- For i As Integer = 0 To Users.Items.Count - 1
- sList(i) = Users.Items(i).SubItems.Item(0).Text & "$" & _
- Users.Items(i).SubItems.Item(1).Text & "$" & _
- Users.Items(i).SubItems.Item(2).Text & "$" & _
- Users.Items(i).SubItems.Item(3).Text & "$" & _
- Users.Items(i).SubItems.Item(4).Text & "$" & _
- Users.Items(i).SubItems.Item(5).Text
- Next
- Try
- File.WriteAllLines(.FileName, sList)
- MsgBox("Speichern erfolgreich.", MsgBoxStyle.Information, "Gespeichert!")
- Catch ex As Exception
- MsgBox("Es ist ein Fehler beim Speichern der Datei aufgetreten!" & ControlChars.CrLf & _
- ex.Message, MsgBoxStyle.Critical, "Fehler!")
- End Try
- Else
- MsgBox("Die Datei wurde nicht gespeichert, da kein Speicherort ausgewählt wurde.", MsgBoxStyle.Information, "Speichern nicht möglich")
- End If
- End With
Jetzt möchte ich eine Funktion schreiben, welche dieses Speichersystem öffnen kann, woran ich aber scheitere ist es, den einen Array, welcher durch "$" geteilt ist, wieder in 6 Arryas zu zerlegen.
Kann mir jemand zeigen, wie dies geht?
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ViktorS“ ()