* Textbox refresh() IF LEN(ALLTRIM(PO_ZIP))>5 This.Format = "R" This.InputMask = "99999-9999" ELSE This.Format = "" This.Inputmask = "99999" ENDIF