<JakeNM@home.com>De: Jake Marx 
Objet: Re: Mouse Move Exit Event
Date <sanzalon@ix.netcom.com>: vendredi 22 octobre 1999 06:22

Hi Sal,

You could use the MouseMove event for the Userform to hide the comment.
This example code shows a Label when the mouse is over the CommandButton;
otherwise, the Label is hidden.  Is this being used for a statusbar?  if
not, maybe you could use the ControlTipText property of the CommandButton.

'/ commandbutton routine
Private Sub CommandButton1_MouseMove(ByVal Button _
 As Integer, ByVal Shift As Integer, ByVal X As _
 Single, ByVal Y As Single)
    with Label1
        if Not .Visible then
            .Visible = true
        end if
    end with
end Sub

'/ form routine
Private Sub Userform_MouseMove(ByVal Button As _
 Integer, ByVal Shift As Integer, ByVal X As _
 Single, ByVal Y As Single)
    with Label1
        if .Visible then
            .Visible = false
        end if
    end with
end Sub

Regards,
Jake Marx


Salvatore Anzalone  wrote in message
news:38100AD7.EB41BE2E@ix.netcom.com...
> I am using the MouseMove Event (for a CommandButton) to run
> some code which shows a comment when the mouse is over the CommandButton
> -
> I want to be able to run code automatically which hides
> the comment when the mouse is no longer over the Button.
>
> Is there a way to have code execute when the mouse pointer "Exits" from
> moving over an object?    Like a "MouseMoveExit" Event if there was one.
>
> Thanks in advance,
> Sal