2
Wort finden und übernächste Zeile anzeigen
Hallo Leute,
ich brauche mal etwas Hilfe. Folgendes Problem. Ich habe einen Text
.
.
.
blabla
bla
blabl
Referenznummer 1:
4711
Referenznummer 2:
0815
.
.
usw
Die Zeile(n) mit dem Wort "Referenznummer" gibt es immer Die Nummer die 2 Zeilen weiter folgt ist variable.
Wie kann ich die Nummer auslesen??
Ich hatte folgendes im Kopf
Aber irgendwie bekomme ich es nicht hin
Für einen Denkanstoß wäre ich dankbar.
0belixx
ich brauche mal etwas Hilfe. Folgendes Problem. Ich habe einen Text
.
.
.
blabla
bla
blabl
Referenznummer 1:
4711
Referenznummer 2:
0815
.
.
usw
Die Zeile(n) mit dem Wort "Referenznummer" gibt es immer Die Nummer die 2 Zeilen weiter folgt ist variable.
Wie kann ich die Nummer auslesen??
Ich hatte folgendes im Kopf
Dim zusammenstellung As New List(Of String)
For Each zeile As String In System.IO.File.ReadLines("text.txt")
If zeile.Contains("Referenznummer") Then
zusammenstellung.Add(???? übernächste Zeile ????)
End If
Next
MessageBox.Show(String.Join(vbNewLine, zusammenstellung.ToArray))Aber irgendwie bekomme ich es nicht hin
Für einen Denkanstoß wäre ich dankbar.
0belixx
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 236771
Url: https://administrator.de/forum/wort-finden-und-uebernaechste-zeile-anzeigen-236771.html
Ausgedruckt am: 23.12.2024 um 18:12 Uhr
2 Kommentare
Neuester Kommentar
Ist erledigt
Dim zusammenstellung As New List(Of String)
Dim zeilen() = System.IO.File.ReadAllLines("text.txt")
For i = 0 To zeilen.Length - 2
Dim zeile = zeilen(i)
If zeile.Contains("Referenznummer") Then
zusammenstellung.Add(zeilen(i + 2))
End If
Next
Hallo Obelixx!
Wenn Du den gesamten Text einliest, per
Grüße
bastla
Wenn Du den gesamten Text einliest, per
Split (an den Zeilenschaltungen) in ein Zeilen-Array aufteilst und dieses dann in einer For-Next-Schleife durchgehst, kannst Du leicht die übernächste Zeile finden ...Grüße
bastla
