S
sashocheck
Добрый вечер!
Подскажите, пожалуйста, решение следуещего вопроса.
Есть процедура:
(Т.е. записываем текст в RichTextBox1 и RichTextBox2. Нажимаем CommandButton1 - текст из RichTextBox1 отображается в RichTextBox3, и если в RichTextBox1 есть слово "Home", то оно заменятся на содержимое RichTextBox2.)
Как сделать, чтобы в RichTextBox3 слово из RichTextBox2, на которое мы заменили слово "Home", отображалось красным цветом?
Подскажите, пожалуйста, решение следуещего вопроса.
Есть процедура:
Код:
Private Sub CommandButton1_Click()
RichTextBox3 = Replace(RichTextBox1.Text, "Home", RichTextBox2.Text)
End Sub
(Т.е. записываем текст в RichTextBox1 и RichTextBox2. Нажимаем CommandButton1 - текст из RichTextBox1 отображается в RichTextBox3, и если в RichTextBox1 есть слово "Home", то оно заменятся на содержимое RichTextBox2.)
Как сделать, чтобы в RichTextBox3 слово из RichTextBox2, на которое мы заменили слово "Home", отображалось красным цветом?