Not sure what you are trying to do and I'll take a simple stab at it.

Lets say you have a control Text1

When text 1 gets the focus of the system, you want to highlight the text, and change the number inside of the control to 1 from 0.

That in itself is real simple with code:

Code:
Private sub text1_GotFocus()

'when control receives the focus, set the back color to color
...