sbornstein1
Registered User.
- Local time
- Today, 02:35
- Joined
- Jun 19, 2001
- Messages
- 24
Hello all. I need your help I need to change the backcolor of text boxes based on a date. Now I have this code but it needs to somehow know to change in the DETAIL section of the form which loops of course through the recordsource.
Dim bg as Long
Dim dt as Date ' this is so there is only 1 function call to Date routine
dt = Date
If Me![OrderDate] =dt Then
bg=vbyellow
ElseIf Me![OrderDate] < dt then
bg = vbwhite
Else
bg = 14540253
End If
ANY IDEAS? THANKS
Dim bg as Long
Dim dt as Date ' this is so there is only 1 function call to Date routine
dt = Date
If Me![OrderDate] =dt Then
bg=vbyellow
ElseIf Me![OrderDate] < dt then
bg = vbwhite
Else
bg = 14540253
End If
ANY IDEAS? THANKS