Change the color of an unbound textbox based on a value.

[topgun64]

Hello Everyone,

I have a form which has a combobox bound to a payee field and I also have a date field. On the form there is an unbound text box called JAN1. What I am trying to accomplish here is when the user selects a payee from the combox and enters a date the unbound textbox changes to green. I have added the below code as the control source for the unbound textbox but I am not sure if I am on the right track.

I dont think the Date procedure is correct below. Somehow I need it look at just the Month of January. So if the Payee is equal to HR Electric and the payment was made say 2 Jay 08 the unbound textbox changes it color to green.

=IIf(CalendarInfo!Payee="HR Electric" And CalendarInfo!Date="Jan",Me.JAN1.BackColor=[vbGreen])

 

[CaptainD]

Not sure where you have your line of code but to get the month you could use Format(CalendarInfo!Date,"MMM") = "Jan" Provided it is a date field.

 

[topgun64]

Thank You Captain D. Just what I was looking for-worked perfectly.