Amy,
You might try something like this (code behind the form):
Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label24.ForeColor = QBColor(15)
Label25.ForeColor = QBColor(15)
End Sub
and these:
Private Sub Label24_MouseMove(Button As...