Best to place the code behind a Save button.
Try:
IF val(left(me.AlsText1,INSTR(me.AlsText1,"/"))) < 0 or val(left(me.AlsText1,INSTR(me.AlsText1,"/"))) > 12 then
' action invalid month
endif
if len(mid(me.AlsText1,INSTR(me.AlsText1,"/")+1)) <> 2 and
len(mid(me.AlsText1,INSTR(me.AlsText1,"/")+1)) <> 4 then
' invalid year length action
endif
Idea ?
Nic;o)