主题：[求助]如何设置按钮进行数据审核

[这个贴子最后由军旅在 2011/06/16 09:12am 第 1 次编辑]

我想在这个录入窗口的“审核报表”这个按钮，设置一个公式，其目的是为了审核“接收总人数”这一列所填的数值是否正确。
我的按键公式是这样设置的：if([项目_退役士兵_按入伍前户口分类_农村入伍_小计] + [项目_退役士兵_按入伍前户口分类_城镇入伍_小计]=[项目_退役士兵_按服役期限分类_义务兵_小计]+[项目_退役士兵_按服役期限分类_复员士官_小计]+[项目_退役士兵_按服役期限分类_转业士官_小计],[项目_退役士兵_按入伍前户口分类_农村入伍_小计] + [项目_退役士兵_按入伍前户口分类_城镇入伍_小计],MsgBox("接收总人数=农村入伍小计+城镇入伍小计=义务兵小计+复员士官小计+转业士官小计,请检查!",0) And SetCellText(GridName,Row,"项目_退役士兵_接收总人数",""))
但这个不能审核这一列的数值是否正确，只能审核一行的的数值。请高手予以指点。为盼！

egd文件下载

[这个贴子最后由军旅在 2011/06/15 10:52am 第 2 次编辑]

当前设置的公式，很好用，谢谢您！但现在审核结束后，即便都是对的，仍显示“审核结果下列记录不能通过”。如果审核后，结果正确，是否可显示“全部通过。

将按钮公式设为：UnLockCol(1,Cols) And ReplaceFor("退役军人接收表","项目_退役士兵_接收总人数",0) And RecalcCol("项目_退役士兵_接收总人数") And FilterFor("项目_退役士兵_接收总人数", "=" , True ) And If(FindRow("退役军人接收表","项目_退役士兵_接收总人数", "=" , True ) > 0,MsgBox("审核结果下列记录不能通过!",1),Do(112) And MsgBox("审核结果全部通过!",1))

真的十分感谢您！