Moin,
meine Frage steht oben. Ich habe jetzt ein Beispielprogramm geschrieben mit der Textbox1. Die erste Zeile ist Hallo, die zweite ist Test und die dritte ist wieder Hallo. Nun will ich die Zeilen vergleichen und wenn festgestellt wird, dass sie gleich sind eine von beiden gelöscht wird.
So funktioniert es aber nicht haha. Hab schon gegooglet aber leider echt nichts gefunden.
Mit freundlichem Gruß
meine Frage steht oben. Ich habe jetzt ein Beispielprogramm geschrieben mit der Textbox1. Die erste Zeile ist Hallo, die zweite ist Test und die dritte ist wieder Hallo. Nun will ich die Zeilen vergleichen und wenn festgestellt wird, dass sie gleich sind eine von beiden gelöscht wird.
VB.NET-Quellcode
- Public Class Form1
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim f As Integer
- Dim i As Integer
- TextBox1.Text = "Hallo" & vbCrLf & "Test" & vbCrLf & "Hallo"
- f = TextBox1.Lines.Length
- TextBox2.Text = f
- For Each lline As String In TextBox1.lines()
- For i = 0 To f
- If lline(i) = lline(i + 1) Then
- TextBox1.Lines(i) = ""
- End If
- Next i
- Next
- End Sub
- End Class
So funktioniert es aber nicht haha. Hab schon gegooglet aber leider echt nichts gefunden.
Mit freundlichem Gruß