Problem with the RGB function (1 Viewer)

[nate0057]

Hi, I have a problem when I use the RGB's function.
Indeed I used it in the three following parts "On format", "on paint", "on print".
However the form's sheet flashes when I launch the program and I don't know why.

The Code is :

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
'GetRGB As Integer

If ([flagblup] = 1 And [Requirement] = "Blueprints") Or ([flagconp=1 And [Requirement] = "Control Plan") Or ([flagGageRR] = 1 And[Requirement] = "Gage R&R") Then
Me.Requirement.BackColor = RGB(237, 28, 36)
Else
Me.Requirement.BackColor = RGB(255, 255, 255)
End If
End Sub

I used the same code for the three parts.

Could somebody help me?

Thank you.

 

[nate0057]

I just try it and it always flashes but slowly!