I am using a label as a toolbar "substitute" ~ I don't want to use a command button in this instance.
I use the following code to imitate a button behaviour
Private Sub LabelAbout_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
LabelAbout.SpecialEffect = fmSpecialEffectSunken
About.Show
End Sub
______________________________________________
Private Sub LabelAbout_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
LabelAbout.SpecialEffect = fmSpecialEffectEtched
End Sub
It works fine in 2000 but in 2004 it doesn't seem to receive the mouse_up event and the label remains in the fmSpecialEffectSunken state.
Anyone have any ideas as to why this behaviour occurs?
I can get around it by using
Private Sub LabelAbout_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
LabelAbout.SpecialEffect = fmSpecialEffectSunken
About.Show
LabelAbout.SpecialEffect = fmSpecialEffectEtched
End Sub
and that works in the 2004 version but I'm just wondering why the difference in behaviour