Use label click to open form, but need to have lable change somehow

I have several lables that when the user clicks , various forms appear.  However, there is a few second's delay and whie I know that the form will come up, an end-user won't.  Is there anyway to change teh appearance of a label when it is click so the user knows?  This is Access 2003 form.
Sandra SmithRetiredAsked:
Who is Participating?
 
Rey Obrero (Capricorn1)Connect With a Mentor Commented:
better to use the mouse down and mouse up event to toggle the appearance of the label

Private Sub Label0_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label0.SpecialEffect = 2
End Sub

Private Sub Label0_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label0.SpecialEffect = 0

End Sub
0
 
Rey Obrero (Capricorn1)Commented:
you can use the click event of the label, and combination of property setting ,border width etc

an example is

private sub label0_click()

me.label0.specialeffect=2

end sub
0
 
Rey Obrero (Capricorn1)Commented:
here are the values of the special effect property

The SpecialEffect property uses the following settings.

Setting Visual Basic Description
Flat 0 The object appears flat and has the system's default colors or custom colors that were set in Design view.
Raised 1 The object has a highlight on the top and left and a shadow on the bottom and right.
Sunken 2 The object has a shadow on the top and left and a highlight on the bottom and right.
Etched 3 The object has a sunken line surrounding the control.
Shadowed 4 The object has a shadow below and to the right of the control.
Chiseled 5 The object has a sunken line below the control.
0
 
Sandra SmithRetiredAuthor Commented:
Cap, mouse down worked perfectly.  Thank you

Sandra
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.