This is the code I am using:
Private Sub OptionLabel1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Me.OptionLabel1.ForeColor = vbRed
End Sub
Private Sub OptionLabel2_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Me.OptionLabel2.ForeColor...