Changing subform background colour

[shafara7]

Hi, how do I make coloured background for each record. See photo.
The colour depends on the task assigned on the records.
For example, when the task is set to Analysis, it will turn blue, when others, the background is normal.

Does it have to do with the following codes?

Private Sub Form_Current()
    txtBackColor.FormatConditions(0).Modify acExpression, acEqual, "[lngMessauftragNr]=" & Me![lngMessauftragNr]
    txtBackColor.FormatConditions(0).Enabled = False
End Sub

If so, I understand how it change it to blue when Analysis is selected because the code does not say any conditions.
I also checked that it does not use the Background Format Tool.

 

[JHB]

Have a look here:
https://www.youtube.com/watch?v=PGeU-dWocnI