Hello,
I'm now trying to create a small notice board , it is a continuous form, display a list of orders, each order can have 2 status, yes and no.
I want to make yes rows' status box blue, and no rows' status box red
Here's part of my code
I know this will cause problem, it will check 1st record's status, if 1st is no, all records become red or blue if 1st is yes.Private Sub Form_Load()
Select Case Me.[RecordStatus]
Case 1 'means no
Me.[RecordStatus].BackColor = 255 'red
Case 2 'means yes
Me.[RecordStatus].BackColor = 16737843 'blue
End Select
Me.Repaint
End Sub
What I really want is all yes records in blue and all no records in red in this form.
But I've no idea how I can do this, how can I write code like
If this row is no then this row's color is red
Else is red
End if
Please give me some ideas.
Thanks very much.