VB实现Label鼠标经过变色的问题
我的Label建立在2张图片上（为了美观设计的）,现在想当鼠标经过时变色和出现下划线(貌似和QQ登陆框上面的链接一样),我的代码是这样写的PrivateSubLabel1...
我的Label建立在2张图片上（为了美观设计的）,现在想当鼠标经过时变色和出现下划线(貌似和QQ登陆框上面的链接一样),我的代码是这样写的
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbRed
Me.Label1.Font.Underline = True
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbBlue
Me.Label1.Font.Underline = False
End Sub
这个代码Label在没有放图片时测试通过，但放了2张图片再把Label放在图片上面颜色变不回来了，请高手来解决下这个超郁闷的问题！ 展开
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbRed
Me.Label1.Font.Underline = True
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbBlue
Me.Label1.Font.Underline = False
End Sub
这个代码Label在没有放图片时测试通过，但放了2张图片再把Label放在图片上面颜色变不回来了，请高手来解决下这个超郁闷的问题！ 展开
2个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
