* Textbox InteractiveChange >>IF This.Value <> PROPER(This.Value) >> lnSelStart = This.SelStart >> This.Value = PROPER(This.Value) >> This.SelStart = lnSelStart >>ENDIF >>