以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  两条件筛选  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121523)

--  作者：y2287958 --  发布时间：2018/7/9 8:25:00 --   1. Dim v As Integer = 0 Dim khmc As WinForm.ComboBox = e.Form.Controls("客户名称") Tables("生产安排窗体_入库主表").Filter = "去订单后实际库存 < " & v & " and 客户名称 = \'" & khmc.Text & "\'" 2. Dim gx As WinForm.CheckBox = e.Form.Controls("勾选") For Each r As Row In Tables("生产安排窗体_入库主表").Rows     r.Checked = gx.Checked Next