Hi Bruce,

Thanks. I have tried it and the following works - thanks to you. Have an nice day.

In the Init and slightly diff in the lost focus:

**
IF LEN(RTRIM(Ins_Zip)) = 9
ThisForm.PageFrame1.Page1.txtIns_Zip.InputMask = '99999-9999'
ELSE
ThisForm.PageFrame1.Page1.txtIns_Zip.InputMask = 'xxxxxxxxxx'
ENDIF
*
ThisForm.Refresh()
**


Regards,

Paige