关于平台撤消?

各位老师好!

      在平台中进行商品信息编辑时,如果在出入库中已进行了出入库,料号不能被修改,修改后怎么撤消,在失去焦点中输入:

  if dcount("*","出入库明细表","料号=''" & me.料号 & "'') then

msgbox"已在出入库中有记录,不能修改料号"

me.料号.setfocus

me.undo

endif

可是已被修改的料号并没有被撤消,该怎么修改语句,望指点!