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

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

  Messagebox.Show("直接关了")   '代码直接执行到这个里  ，明明，有几行是空值来的，现在是用开发者的账号增加空行，就能直接判断，用其他用户的就不行

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