>>*Interactive Change >>* lEntered00 - custom property of textbox >>this.lEntered00 = (THIS.TEXT = "00") >> >>*Valid >>DO CASE >>CASE this.lEntered00 >> this.value = ADDCENT(this.value) >>CASE EMPTY(this.value) >> this.value=YEAR(DATE()) >>ENDCASE >>... >>