Hallöchen ich habe erneut eine Frage an das Forum.
Ich habe eine For Each formel die eine Text-Datei zeile für Zeile durchsuchen Soll und dann das ergebnis in einer Textbox ausgebn soll.
Statt aber die Textdatei einmal zeile für zeile durchzugehen fängt Sie immer wieder an so das ich dsas ergebniss quasi unendlich in der textbox hab.
wie kann ich das unterbinden?
Ich habe eine For Each formel die eine Text-Datei zeile für Zeile durchsuchen Soll und dann das ergebnis in einer Textbox ausgebn soll.
Statt aber die Textdatei einmal zeile für zeile durchzugehen fängt Sie immer wieder an so das ich dsas ergebniss quasi unendlich in der textbox hab.
wie kann ich das unterbinden?
VB.NET-Quellcode
- Dim Filetest = AppDomain.CurrentDomain.BaseDirectory & "Data\test.txt"
- For Each line As String In File.ReadLines(Filetest)
- If line.Contains("1") Then
- TextBox1.Text &= Environment.NewLine & line
- ElseIf line.Contains("2") Then
- TextBox1.Text &= Environment.NewLine & line
- ElseIf line.Contains("3") Then
- TextBox1.Text &= Environment.NewLine & line
- End If
- Next
- End Sub