With e.Form.Controls("是否采购") If Filter > "" Then Filter = Filter & " And " End If If .checked Then Filter = Filter & "是否采购 = true " Else Filter = Filter & "(是否采购 = false or 是否采购 is null)" End IfEnd With