MouseMove是鼠標(biāo)移過控件時的事件，好比你添加了個Command，當(dāng)你的鼠標(biāo)從Command上移過時，會觸發(fā)MouseMove，當(dāng)然，如果只是在其他位置移動鼠標(biāo)，并不會觸發(fā)該控件的MouseMove事件！

鼠標(biāo)移動到button控件上，觸發(fā)該控件的MouseMove事件和MouseEnter事件。
按鈕樣式會變化要通過按鈕的屬性來改變。

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

寫你要的事件

End Sub

代碼如下。
＝＝＝＝＝＝
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox "你的鼠標(biāo)移動到按鈕上了"
End Sub