最佳答案:方法/步骤如下1、拖入标签控件。2、编辑按钮之前的颜色3,输入代码Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X A
方法/步骤如下
1、拖入标签控件。
2、编辑按钮之前的颜色
3,输入代码
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.BackColor = &H80000018
End Sub
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.BackColor = &H8000000D' 悬浮按钮之后的颜色
End Sub
4、运行一下吧:-]
添加命令
1,打开label1的click的事件
2,输入你想输的命令,如 form2.show
3,再运行一下吧
注意事项
按钮的两件的颜色可自定义
注意事件