Удалить повторяющиеся строки из текстового поля или richtextbox vb.net

Question

Есть ли у кого-нибудь пример кода, как это сделать? например:

a 
b 
b 
c 
b 
d 

будет в конечном итоге, как

a 
b 
c 
b 
d 

Answer 1

Он смотрит на меня, как вы хотите, чтобы удалить повторяющиеся линии, а не просто получить список различных значений (как показано присутствием от «b» до «d» в желаемом выходе).

Если да, то вы можете использовать такой код:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Dim lines As New List(Of String)(TextBox1.Lines) 
    For i As Integer = lines.Count - 1 To 1 Step -1 
     If lines(i) = lines(i - 1) Then 
      lines.RemoveAt(i) 
     End If 
    Next 
    TextBox1.Lines = lines.ToArray 
End Sub