Hover Effect 1

[LakotaMan]

Hi All.
Using ver. 2007, I would like to have a label change bg color when the mouse moves over it and then return to its usual color when the mouse moves away. I have used the MouseMove event to achieve the first part of my wish, but the color stays, and after searching the postings, have not found a solution.
Any thoughts?
Thanks in advance,
LM

 

[dhookom]

I have done this with code in the form (or whatever is around the label) to change the effect back to normal.

Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Me.lblContinue.SpecialEffect <> 0 Then
        Me.lblContinue.SpecialEffect = 0
    End If
End Sub

Private Sub lblContinue_Click()
    DoCmd.OpenForm "frmMainMenu"
    DoCmd.Close acForm, Me.Name
End Sub

Private Sub lblContinue_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Me.lblContinue.SpecialEffect <> 3 Then
        Me.lblContinue.SpecialEffect = 3
    End If
End Sub

Duane
Hook'D on Access
MS Access MVP

 

[LakotaMan]

Duane,

Sorry to tak so long to get to this, works beautifully!

Thanks so much for the help!

Have a star.
LM