MouseMove or MouseOver Property

[Don]

What I want to do seems faily simple, but I can't find the
property to do this.

I have a label on my form that "looks" like a link. I
made it blue and underlined. The code for the label Click
works great.

What I want to do is when I move the mouse over the label,
I want the pointer to change to the "finger" or "hand." I
looked on Help and I saw properties for vertical size,
horizontal size, etc, but not the "finger." For example
the "11" is the hourglass.

Also, if I want to change back to the "normal pointer" for
all other spots on the form, shouldn't I have a MouseOver
or MouseMove property for the form itself to set it back
to the original pointer?

Private Sub lblSelectAll_MouseMove(Button As Integer,
Shift As Integer, X As Single, Y As Single)

Screen.MousePointer = 10

End Sub

Any insight would be great.

Thanks Always,
Don

 

[Don]

After some more research, I found an answer that works
well. ) Maybe some access experts can comment here.

I set the Hyperlink SubAddress for the label to "*" in the
mouse move event.

Private Sub lblSelectAll_MouseMove(Button As Integer,
Shift As Integer, X As Single, Y As Single)
Me.lblSelectAll.HyperlinkSubAddress = "*"

Then the first line of code for my click event this, so I
don't get an invlaid address error when clicking on the
label.

Private Sub lblSelectAll_Click()
Me.lblSelectAll.HyperlinkSubAddress = ""
chkBarAdmin = True
chkPracticeGroups = True, etc etc

Any comments??????