Flashing text in multiple data fields on same form

[BEI77]

I am a novice user and have developed a database for stock car racing. One page is for analysis of tire temperature. I have placed fields that will show when the tires need air pressure and a camber change based on temperature analysis.


I want these fields text to flash when an adjustment needs to be made.
I am using the following code and can get 1 field (text49) to flash.
I want to be able to make about 5 more fields to flash but cannot figure out how to do that.

If Me.Text49.ForeColor = 255 Then
Me.Text49.ForeColor = vbBlue
Else
Me.Text49.ForeColor = 255
End If

Any help would be apprectiated.

[ssanfu]

Off the top of my head, maybe something like this.

In the timer event code:

'tire pressure
  If Me.TirePSI > 100 Then
     If Me.TirePSI.ForeColor = 255 Then
         Me.TirePSI.ForeColor = vbBlue
     Else
         Me.TirePSI.ForeColor = 255
     End If
  Else
     'not in alarm color
     Me.TirePSI.ForeColor = vbBlue
  End If
 
'tire temperature
  If Me.TireTemp > 200 Then
     If Me.TireTemp = 255 Then
         Me.TireTemp = vbBlue
     Else
         Me.TireTemp = 255
     End If
  Else
     'not in alarm color
      Me.TireTemp.ForeColor = vbBlue
  End If


'tire Camber degrees
  If Me.TireCamber > 5 Then
     If Me.TireCamber = 255 Then
         Me.TireCamber = vbBlue
     Else
         Me.TireCamber = 255
     End If
  Else
     'not in alarm color
      Me.TireCamber = vbBlue
  End If

(Really should take the time to rename the controls - so much easier following the code)

[Missinglinq]

...I am using the following code and can get 1 field (text49) to flash...I want to be able to make about 5 more fields to flash but cannot figure out how to do that...

As ssnafu showed you, you'd do it in the same manner, simply changing the name of the Textboxes.

Having said that, flashing Controls are really a bad idea; among other things, they can make users with epilepsy (and many epileptics are unknown as such to their co-workers) have seizures! It should really suffice to do something like changing the BackColor of the Control to a stand out color, like red, and would also look much more professional. Easiest way to do this would probably be to use Conditional Formatting.

Linq ;0)>