VBA to change font color

[data808]

I have the following code below for a label that changes its caption. Does anyone know how to change the "Adding New Record" caption to red color font? What would I have to add to this code to make it happen? I only want the font to change color when it says "Adding New Record".



If Me.NewRecord Then
Me.lblRecordCounter.Caption = "Adding New Record"
Else
Me.lblRecordCounter.Caption = _
"Record " & Me.CurrentRecord & " of " & Me.Recordset.RecordCount
End If

Thanks.

[June7]

That is the Forecolor property.

Me.lblRecordCounter.ForeColor = vbRed

[data808]

Thanks June7. Worked like a charm but then I decided to go with "vbGreen" and was not satisfied with the shade of green it gave me. How do I make it a darker green?

[June7]

Review https://www.accessforums.net/program...lid-46576.html

[data808]

Thanks. I actually did something similar today but couldn't get it to work. I did it wrong. I did this:

me.lblRecordCount.Forecolor = vbGreen (RGB 0, 146, 0)

I now know that I was not supposed to add the vbGreen.

Thanks for the help.

[June7]

me.lblRecordCount.Forecolor = RGB(0, 146, 0)