从RichTextBox的每一行中删除前27个字符

Question

如何从RichTextBox的每一行中删除前27个字符？

我努力了

For Each i In RichTextBox1.Lines
        i = RichTextBox1.Text.Remove(0, 27)
    Next

Answer 1

与其遍历Lines属性并尝试单独更改每行，不如尝试为Lines属性分配一个新数组，如下所示：

更新以处理少于27个字符的行

RichTextBox1.Lines = RichTextBox1.Lines.Select(Function(line) If(line.Length >= 27, line.Remove(0, 27), line)).ToArray()

除了String.Remove()您还可以使用String.Substring()

RichTextBox1.Lines = RichTextBox1.Lines.Select(Function(line) If(line.Length >= 27, line.Substring(27), line)).ToArray()

Answer 2

如果要保留 RichTextBox中已经存在的格式 ，请按照以下方式进行操作：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    For i As Integer = 0 To RichTextBox1.Lines.Length - 1
        Dim index As Integer = RichTextBox1.GetFirstCharIndexFromLine(i)
        RichTextBox1.Select(index, Math.Min(27, RichTextBox1.Lines(i).Length))
        RichTextBox1.SelectedText = ""
    Next i
End Sub