Colorear letras automaticamente y situacion del cursor

[coku]

 

Buenas^^

Bien, tengo un programa el cual tiene un Richtextbox con un modulo que lo que hace es colorear letras pero el problema esque las colorea cuando el cursor pincha en la line en la que esta la palabra pero las demas palabras iguales en el resto del texto n las colorea.
¿Como hago para que se coloreen todas al pulsar en el richtexbox en cualquuier linea?(si nesesitan codigo s pidanlo)

--------------------------------------------------------------------------------------------------

Esta es otra duda.

Tengo un textbox que al pulsar enter lo que tiene dentro se va al rich textbox, que le tengo que añadir al siguiente codigo para que aparte de hacer lo que hace haga que la situacion del cursor sea en el textbox?

Código [Seleccionar] Expandir

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{tab}", True
KeyAscii = 0
Rich1 = Rich1.Text & vbCrLf & "        mes " & """" & Text2 & """"
Text2 = ""
End If
End Sub

Muchas gracias de antemano a todos^^

[~~]

1) aki tienes ejemplos detallados de como usar un rich text box:
http://www.recursosvisualbasic.com.ar/htm/tutoriales/richtextbox.htm

2) Usa el focus