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