Option Explicit

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblBooking.ForeColor = &HFF
    lblDatabase.ForeColor = &HFF
    lblGlobal_Update.ForeColor = &HFF
    lblMedia_Config.ForeColor = &HFF
    lblServer_Config.ForeColor = &HFF
    lblShutdown.ForeColor = &HFF
End Sub

Private Sub lblBooking_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblBooking.ForeColor = &HE9A29C
End Sub

Private Sub lblDatabase_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblDatabase.ForeColor = &HE9A29C
End Sub

Private Sub lblGlobal_Update_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblGlobal_Update.ForeColor = &HE9A29C
End Sub

Private Sub lblMedia_Config_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblMedia_Config.ForeColor = &HE9A29C
End Sub

Private Sub lblServer_Config_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblServer_Config.ForeColor = &HE9A29C
End Sub

Private Sub lblShutdown_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lblShutdown.ForeColor = &HE9A29C
End Sub