Comment box text colour

[Bartman]

Hi,

I have a comment box named "Task_Update" were I have created some code
to add the user name and date to any text entered.

I would like just the auto text "Updated" and the Date to be black
text, but all manual text entered to be in red.

Can it be done? Everything I try colours the whole text in one colour.

Private Sub Task_Update_AfterUpdate()
Me.Task_Update = Me.Task_Update & " Updated: " & Date & " " & "By:" &
" " & Me.Nstamp2.Value & Chr(13) & Chr(10)
Chr (10) & Chr(13)
End Sub

Bartman

 

[Douglas J. Steele]

The only way to be able to do it would be to use RTF (Rich Text Format)

You can download a free RTF control from Stephen Lebans at
http://www.lebans.com/richtext.htm

 

[Bartman]

Thanks Douglas!

Bartman

The only way to be able to do it would be to use RTF (Rich Text Format)

You can download a free RTF control from Stephen Lebans at
http://www.lebans.com/richtext.htm