As Integer, ByVal Shift As Integer, ByVal X AsSingle, ByVal Y As Single)
'当鼠标移动时改变颜色
lbl_3.BackColor...As Integer, ByVal Shift As Integer, ByVal X AsSingle, ByVal Y As Single)
'当鼠标移动时改变
lbl_4.BackColor...As Integer, ByVal Shift As Integer, ByVal X AsSingle, ByVal Y As Single)
'当鼠标移动时改变颜色
lbl_1.BackColor...As Integer, ByVal Shift As Integer, ByVal X AsSingle, ByVal Y As Single)
'当鼠标移动时改变颜色
lbl_2.BackColor...1" 已经改变颜色
If Y D_L1_Top_Ma Then '如果鼠标离开那么改变回默认颜色
lbl_1.BackColor