>Hi ---
>
>In the Init of the TextBox, put:
>
>THIS.Value=100-(database.field*100)
>THIS.Refresh()
>
>In the LostFocus of the TextBox, put:
>
>REPLACE database.field WITH 1.00-(THIS.Value*.01)
>
>Do not set a ControlSource for the Textbox, and make sure that you have your InputMask set the right way (probably "999")

---

THanks! ^_^;

I would put the init() coding into refresh() procedure!
Then, no need to refresh!