昨天,一个学员问我,可以让子窗体中的订单已审核,就不能使用编辑功能吗?
这个问题我开始还一愣,我们教程中有这个功能啊!后来他详细说明了情况,原来是打开编辑窗体之前做判断,已审核就连窗体都不能打开。
这个功能可能还有其他学员需要,特地整理了一下。
基本原理就是在,编辑按钮的单击事件里面执行打开_EDIT窗体之前做一个判断,代码如下:
If DLookup("审核人", "cg_采购订单查询", "采购订单号='" & Me.sfrList![采购订单号] & "'") <> "" Then
MsgBox "已审核!"
Exit Sub
End If
演 示: