Results 1 to 2 of 2
  1. #1
    Join Date
    May 2006

    Unanswered: Label color flash from black to red for 60 seconds

    Access 2000


    If the following code finds a record; is it possible to have the font color of the “tag” label flash from black to red for 60 seconds?

    'If no record then do nothing
    If IsNull(DLookup("[tag]", "Advisories", "[tag]='" & Me![VehTag] & "'")) Then
    Exit Sub
    End If

    Thank you

  2. #2
    Join Date
    Feb 2002
    Yes, but you will have to turn the OnTimer setting on the form to On.

    I use the following:

    Private Sub Form_Timer()
    With Me.Alert
    .ForeColor = (IIf(.ForeColor = vbRed, vbBlack, vbRed))
    '.visible = (IIf(.BackColor = 10092543, 33023, 10092543))
    btnSchedule.ForeColor = (IIf(.ForeColor = vbRed, vbBlack, vbRed))
    End Sub

    "Alert" is the control name that will flash

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts