请教（软件中的按钮如何做到：当鼠标移到上面时改变颜色，鼠标移出时恢复成默认颜色？） 在线等！

Question

软件中的按钮如何做到：当鼠标移到上面时改变颜色，鼠标移出时恢复成默认颜色？就像网页中的超级链接一样！
先行谢过！^_^

Answer 1

CommandButtom里面的MouseMove，还有Lostfocus属性，自己试一下吧。我也没用过，在脚本（code）的上面有2个下拉菜单，在右边那个里面找

Answer 2

按钮(commandbutton)控件好像无法直接改变字体的颜色。如果一定要用的话，可以用label控件代替。改变颜色的方法如下：
'设置成黑色（缺省颜色）
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Label1.ForeColor = vbBlack
End Sub
'设置成蓝色
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Label1.ForeColor = vbBlue
End Sub

Answer 3

在commandbutton的mousemove和窗体的mousemove中写代码
或者做两张图片，不过还是要在commandbutton的mousemove和窗体的mousemove中写代码

Answer 4

Command控件可以变颜色，在界面编辑时首先把它的style设置为1，然后再在事件里面赋值，backcolor＝rgb（＃,#,#)就可以了。用Mousemove事件