怎么使输入错误后焦点不转移

[smilegw]

在数据窗口中,有一列是身份证号,怎么样才能实现,假如用户输入错误后,焦点一直不能离开只能输入正确后才能离开?
IF 身分证号错误 THEN
MessageBox("提示信息","身份证号码错误，请修改！",Exclamation!)
END IF
这样提示信息后,焦点可以转移,怎么才能使焦点不转移呢?

[klbt]

在数据窗口ItemChanged事件：
IF 身分证号错误 THEN
MessageBox("提示信息","身份证号码错误，请修改！",Exclamation!)
Return 1
END IF

[andzen]

IF 身分证号错误 THEN
MessageBox("提示信息","身份证号码错误，请修改！",Exclamation!)
RETURN 1
END IF

[runsoft]

OK,

[htp_htp]

return 1

[smilegw]

好象不行
提示 item " 某某 " does not pass validation test
我的焦点仍然可以用鼠标移到别的地方,能不能不让它动,不输入正确的就不能做别的,只能输入正确的才可以转移呢?

[liliang800207]

IF 身分证号错误 THEN
MessageBox("提示信息","身份证号码错误，请修改！",Exclamation!)
该控件得到焦点
END IF

[klbt]

你在itemerror事件中也要return 1