主题：[求助]同样的代码不同的表，存在执行差

If DataTables("订单").Find("[发生日期] Is Null and [产品] Is Null and [客户] Is Null") Is Nothing Then

    Return '那么返回

End If

Dim Result1 As DialogResult

Result1 = Messagebox.Show("本次登记的业务数据不完整,按""否""将为你选出未登记未整的业务,按""是""将不会保存未完整的数据,确定要关闭平台吗?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

If Result1 = DialogResult.No Then

    e.Cancel = True '取消关闭项目

    Tables("订单").Filter = "[发生日期] Is Null or [产品] Is Null or [客户] Is Null"

    MainTable = Tables("订单")  

End If

上述代码应该没问题，在项目BeforeCloseProject能执行，可是相同的在其他表里却不能执行该代码，关闭项目就直接关闭了，没有判断行为