All pastes #293132 Raw Edit

Mine

public text v1 · immutable
#293132 ·published 2006-12-27 06:31 UTC
rendered paste body
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