Добавление заданного текста к содержимому RichTextBox (WPF)
Напишем метод, который добавляет к содержимому расширенного текстового поля RichTextBox текст заданного цвета:
Private Sub AppendText(text As String, color As Color)
With RichTextBox1
.SelectionStart = RichTextBox1.TextLength
.SelectionLength = 0
.SelectionColor = color
.AppendText(text)
.SelectionColor = .ForeColor
End With
End Sub
