大家好！
请教大家一个问题我在窗口上有个用Label1输入的标题，想在鼠标放在Label1字体上时自体会自己改变颜色（比如：黑子变成了蓝子）。请教了，谢谢！

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = &HFF0000
End Sub

兄弟：地道！太棒了！谢谢！

兄弟如果鼠标挪走字体，如何恢复原来颜色？再次表示感谢！！！

在窗体的MouseMove事件中写相同代码，当然颜色你要变了。比如要变红色，可以是&HFF&或者vbRed

要恢复原来的颜色也可以：
Label1.ForeColor = Original