Public blnCtrlHasFocus
Private Sub [b]Form_Timer()[/b]
If blnCtrlHasFocus Then
Me.Text10.BackStyle = -1 * (Me.Text10.BackStyle) + 1
'Toggles the backstyle from (0 Transparent to 1 normal
End If
End Sub
Private Sub Text10_GotFocus()
blnCtrlHasFocus = True
End Sub
Private Sub Text10_LostFocus()
blnCtrlHasFocus = False
End Sub