Conditional Formatting a form

[tarena]

I'm using Access 97 and need to format a field to be one color if the value is greater than the base number and another color if the value is less than the base number and just white if the value is = to the base number. I know how to format a report but doing it in a form is stumping me. Can anyone help? Silly question.

Thanks

 

[randy700]

Something like....

Select Case [i]YourField[/i]
    Case > Base:
        me.txtTextBoxName.Backcolor = vbYellow
    Case < Base:
        me.txtTextBoxName.Backcolor = vbBlue
    Case Other:
        me.txtTextBoxName.Backcolor = vbWhite
End Select

Randy

 

[tarena]

Where should I put this code?

 

[missinglinq]

This is assuming, of course, that you're dealing with a form in Single View!The first code changes the color of the textbox immediately after a value is entered into it

Private Sub YourField_AfterUpdate()
Select Case YourField
    Case Is > Base:
        Me.YourField.BackColor = vbYellow
    Case Is < Base:
        Me.YourField.BackColor = vbBlue
    Case Other:
        Me.YourField.BackColor = vbWhite
End Select
End Sub

the second continues the formatting when you move from record to record.

Private Sub Form_Current()
Select Case YourField
    Case Is > Base:
        Me.YourField.BackColor = vbYellow
    Case Is < Base:
        Me.YourField.BackColor = vbBlue
    Case Other:
        Me.YourField.BackColor = vbWhite
End Select
End Sub

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!