如何通过MOUSEMOVE事件来显示按纽

Question

现在我要通过MOUSEMOVE事件来显示按纽。
   思路是这样的，我鼠标点到COMMAND1上面，COMMAND1就显示/
                       点到COMMAND2上面，COMMAND2就显示。
   请高手指导。谢谢。

Answer 1

Option Explicit
Dim cmdx, cmdy As Integer
Private Sub Form_Load()cmdx = Command1.Top + Command1.Width
cmdy = Command1.Left + Command1.Height
Command1.Visible = False
End SubPrivate Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If X < cmdx And X > Command1.Top And Y < cmdy And Y > Command1.Left Then Command1.Visible = TrueEnd Sub

Answer 2

一开始command1按钮隐藏,当鼠标放到command上的时候就不隐藏,不知道是不是楼主的要求?

Answer 3

应该在command的下一层放一个控件来控制，Form_MouseMove太费资源。