Добавление заданного текста к содержимому 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