Hallo,
ich habe mal wieder eine Frage zu VB.net
Nämlich möchte ich eine Datei öffnen und dazu dann aus den ersten drei Zeilen die Informationen auslesen.
Das sind der Firmenname, der -standort und der gewünschte Liefertermin. Diese Informationen sollen dann gesplittet werden und in einen Labeltext gebracht werden. Das habe ich wie folgt gemacht:
With OpenFileDialog1
.Filter = _
"Textdokumente (*.txt)|*.txt"
.FileName = "Bestellung.txt"
.Title = "Bestellung importieren"
If .ShowDialog() = DialogResult.OK Then
Dim line As String
For Each line In File.ReadAllLines(.FileName)
Dim parts As String() = line.Split(New Char() {","c})
If parts(0) = "Firmenname" Then
Label1.Text = "Firma:" + vbNewLine + parts(1)
ElseIf parts(0) = "Firmenstandort" Then
Label2.Text = "Standort:" + vbNewLine + parts(1)
ElseIf parts(0) = "Gewünschter Liefertermin" Then
Label3.Text = "Termin:" + vbNewLine + parts(1)
End If
Next
End If
End With
Alles anzeigen
Ursprünglich hat der Code so auch funktioniert, nachdem ich die Form dann allerdings erweitert habe (ListBox, ...) ging es auf einmal nicht mehr. Das heißt ich öffne die Datei, der Labeltext bleibt allerdings gleich.
Hier der Inhalt der Datei.
ZitatFirmenname: Hotdogs
Firmenstandort: Jefferson
Gewünschter Liefertermin: Morgen
Zu liefernde Waren (Liste der Artikelnummern):
8. Sandwich mit Belag - 8$ | Anzahl: 15 | Kosten: 120$
Ich hoffe ihr könnt mir erklären was ich falsch gemacht habe.
Mit freundl. Grüßen
Padarom
edit:
Problem gelöst, habe ausversehen das ":" zu einem "," geändert.