.net - 在富文本框中写入新行。用vb

Question

嗨，伙计们，我想知道如何在富文本框中的新行中写下短语中的每个单词让我们说短语是这样的“返回一个字符串数组，其中包含在此实例中分隔的子字符串”

我正在使用的代码是这个

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

但是有了这个，它只写了句子的最后一个词。我想要的是在richtextbox的新行中写下所有的单词。

Answer 1

我喜欢使用vbCrLf常量：

RichTextBox1.Text = TextBox1.Text.Replace(" ", vbCrLf).Replace(vbTab, vbCrLf)

Answer 2

Dim words As String = TextBox1.Text
words.Replace(" ", ControlChars.Lf)
RichTextBox1.Text = words

您只需要替换" "为ControlChars.LfakaNew Line Character

Answer 3

您可以使用 vbCrLf 常量：

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

Answer 4

你的代码很好，除了一件事。您每次都将 RichTextBox 设置为字符串，因此它会不断覆盖。你需要串联...

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

请注意，在写入 RTB 的行上添加了“&”。

Answer 5

要添加新行，最好的选择是：

RichTextBoxResult.AppendText(Environment.NewLine)