How can I assign a color & combo option to one record? 1

[lebanoncedars]

Hi there,
Anyone knows How can I assign color and combo box option to one record ONLY in continous form?

this is my code:

Private Sub Status_Click()

Status.ForeColor = vbBlack
text0.ForeColor = vbVlack
text0 = Status

Select Case Me.Status
Case "Dispatched" 'Order to be dispatched
text0.BackColor = vbRed
text0.ForeColor = vbBlack
Me.text0 = "Dispatched"
Case "Picked Up" 'Order Dispatched
text0.BackColor = vbGreen
text0.ForeColor = vbBlack
Me.text0 = "Picked Up"
Case "Cleared" 'Order cleared
text0.BackColor = vbCyan
text0.ForeColor = vbBlack
Me.text0 = "Cleared"
Case "to be Invoiced" 'Order invoiced
text0.BackColor = vbBlue
text0.ForeColor = vbBlack
Me.text0 = "to be Invoiced"

Case Else
Status.ForeColor = vbWhite
text0.ForeColor = vbWhite
End Select

End Sub

thank you
Lebanoncedars

 

[KenReay]

Hi

Try

http://www.lebans.com

in the downloads section there is code which may allow you to do this, but as I already said it is not standard A97 functionality

Hope this helps

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
UK
kenneth.reaySPAMNOT@talk21.com
remove SPAMNOT to use

 

[lebanoncedars]

Hi Kinreay,
I have office xp by the way.

So anyway I will at that site .
Thanks kindly
L.cedars