IF m.nKeyCode = 13 IF MyGrdTable.wk01 = 0 * New line added. REPLACE MyGrdTable.wk01 WITH 1 ELSE * New line added. REPLACE MyGrdTable.wk01 WITH 0 ENDIF * New line added. THISFORM.cmDataManager.Update('MyGrdTable') THIS.PARENT.PARENT.Column4.chkCheckboxCustom1.REFRESH() NODEFAULT ELSE DODEFAULT(nKeyCode, nShiftAltCtrl) ENDIFThis does the trick, even with the refresh just on the chkBox.