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.