IF m.a=m.w =MessageBox("true") grdTable = thisform.Grid1.RecordSource SKIP IN (grdTable)&&¬hng happend IF EOF(grdTable) SKIP -1 IN (grdTable) ENDIF thisform.Grid1.column7.SetFocus() thisform.Grid1.refresh() && I am not sure if this ine is necessary! ELSE =MessageBox("false") ENDIF