richtextbox定义行颜色的有关问题?

richtextbox定义行颜色的问题??
msgwnd.Text   =   msgwnd.Text   &   vbCrLf   &   Date   &   "     "   &   Time   &   "     "   &   "input   word "
msgwnd.SelStart   =   Len(msgwnd.Text)
msgwnd.SelText   =   NewString
如果要定义写进去的一行内容的颜色怎么做？先谢过了。

[解决办法]
RichTextBox.SelStart = 0
RichTextBox.SelLength = 100
RichTextBox.SelColor = vbRed
[解决办法]
晕啊，发了这么多贴
[解决办法]
没遇到过这种情况.