How-2 Make A TextBox Flash On A Specific Date

C

Charles Phillips

Hello,
I am using MS-Access 97.
I am trying to make a text box flash on a specific date in/on the
form/label...
This is my code:

Private Sub Form_Current()
If Date >= Text224.Date() Then
Me.TimerInterval = 500
Else
Me.TimerInterval = 0
Me.Text224.ForeColor = vbRed
End If
End Sub

Can someone tell me what I am doing wrong?

Charles L. Phillips
 
G

Graham Mandeno

Hi Charles

Do you also have a Timer procedure to perform the flashing?

Private Sub Form_Timer()
With Me.Text224
If .ForeColor = vbRed Then
.ForeColor = vbWhite
Else
.ForeColor = vbRed
End If
End With
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

On timer event - help!! 3
How to let certain TxtBoxes blink & change fore color? 2
Error with Private Sub Form_Current() 9
OnTimer event not called when form opened from code 2
Flashing Label 3
'Flashing' data 8
Setting a Counter (Code Here) 3
Timer event on switchboard 1

Top