Originariamente inviato da Bighi
Ho fatto anch'io qualcosa di simile, un pelo piu' complesso perche' ho utilizzato dei tag tipo html nelle stringhe.

cmq io partendo dal tuo esempio l'ho fatto cosi':

codice:
Public Sub Writelog(ByVal text As String, ByVal Color As Color)
   frmLOG.rtbLOG.SelectionColor = Color
   frmLOG.rtbLOG.AppendText(vbCrLf & text)
End Sub

PS. Io avrei anche messo il vbCrLF dopo il text, ma non conosco il resto del programma.
ma cosi nn funzionerebbe....l'ultima riga deve essere selezionata automaticamente...nn sei tu a selezionare il testo per cui cambiare colore....