Hallo Leute, ich möchte wissen, wie man jedes Wort in einer Phrase in eine neue Zeile in einer Richtextbox schreibt. Sagen wir, die Phrase ist "Gibt ein String-Array zurück, das die Teilstrings in dieser Instanz enthält, die begrenzt sind."

und der Code, mit dem ich arbeite, ist dieser

Dim words As String = TextBox1.Text
    Dim split As String() = words.Split(New [Char]() {" "c, CChar(vbTab)})

    For Each s As String In split
        If s.Trim() <> "" Then
            RichTextBox1.Text = (s)
        End If
    Next s

Aber mit diesem schreibe es nur das letzte Wort des Satzes. Und ich möchte, dass alle Wörter in eine neue Zeile der Richtextbox geschrieben werden.