If e.DataCol.Name = "取消与否" Then If e.DataRow("取消与否") = False Then Tables("采购订单").Filter = "[取消与否] <> true" If e.DataCol.Name = "开piao与否" Then If e.DataRow("开piao与否") = True Then Tables("采购订单").Filter = "[开piao与否] <> true Or [开piao与否] Is Null" End If End If End If End If