Applecore Pages on Microsoft Access

Simulating Mouse Overs

If you have a control, you can temporarily change the control when the mouse is moved over it, by using the MouseMove event for the control to change the required property. Unfortunately, there is no event for the mouse moving off a control, so you have to trap this event by using the MouseMove event for the section of the form on which the control is located. For example, if you have a label on a form (note that this will not apply to a label that is associated with a control, as these have no events of their own), and you want to change the label, then you could use something like this:

Private Sub lblName_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me!lblName.Caption="Go on, do it"
    Me!lblName.BackColor=vbRed
End Sub
 
Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me!lblName.BackColor=Me.Detail.BackColor
    Me!lblName.Caption="Original Message Text"
End Sub

Top

 


HOME | NEW | TABLES | QUERIES | FORMS | REPORTS | GENERAL | API | DOWNLOADS | TUTORIAL | RESOURCES
E-MAIL
Copyright & Disclaimer

 

Last modified at 06/06/2006 14:54:53