Blinking Text

[Jean Ulrich]

Hi
I want to create a blinking text in a form
I have a field named "test" and i would like that this field blink all the
time.
I have set the timer to 1000 that means that the text will blink every
second
To make the text blink i want that every second the forecolor change
255 for red then 0 for black 255, 0, 255, 0, 255, 0 ...and so on
can somebody give me the exact vb code to put in the form properties "On
Timer"
thanks

 

[Douglas J. Steele]

You sure you want to do this? Many people find blinking text to be extremely
annoying!

To change the color, you need:

If Me!test.ForeColor = 255 Then
Me!test.ForeColor = 0
Else
Me!test.ForeColor = 255
End If

 

[TC]

Or, that old trick:

Me!test.ForeColor = 255 - Me!test.ForeColor

TC

 

[Douglas J. Steele]

Yeah, that'll do it too! <g>