[Pytanie] Podświetlanie tekstu

[Vipper]

Cześć, mam pytanie. Otóż dajmy na to istnieje sobie RichTextBox1 w którym odręcznie user pisze treść, i tam znajduje się jakieś słówko (tudzież "więc") i chodzi o to, aby wszystkie te słówka więc, były podświetlone. Jak zrobić aby podświetlane były tylko te wyrazy, nie cały RTB =) ?

[Maciek2699]

Dim strpo As Integer = -1

For i = 1 To Regex.Matches(richtextbox1.Text, Regex.Escape(TxtSearch.Text)).Count

strpo = richtextbox1.Find(TxtSearch.Text, strpo + 1, RichTextBoxFinds.None)

If (strpo >= 0) Then

richtextbox1.SelectionStart = strpo

richtextbox1.SelectionLength = TxtSearch.TextLength

richtextbox1.SelectionBackColor = Color.Orange

End If

Next

i importujesz System.Text.RegularExpressions