تغییر رنگ نوشته با بردن موس روی متن

[tehran2009]

بچه ها چطوری می تونم وقتی موس رو روی نوشته ای که توی برنامه دارم ببرم رنگش عوض بشه؟؟؟ (مثلاً آبی بود موس بره روش قرمز بشه)

[M.T.P]

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 = vbRed
End Sub