以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  查找的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=43227)

--  作者:kgdwxfmqj520
--  发布时间:2013/12/2 16:33:00
--  查找的问题

Dim kfsx As WinForm.ComboBox = e.Form.Controls("客户筛选")
Dim cpmc As WinForm.ComboBox = e.Form.Controls("产品名称")
Dim wlbhh As WinForm.TextBox = e.Form.Controls("物料编号")
Dim xhggg As WinForm.TextBox = e.Form.Controls("型号规格")
Tables("出库明细表").Filter="订单客户 = \'" & kfsx.Text & "\' and 物料名称 like \'*" & cpmc.Text & "*\' and 物料编号 like \'*" & wlbhh.Text & "*\' and 型号规格 like \'*" & xhggg.Text & "*\'"

我想在以上的代码中加一个“查找还未对账”的行该怎么写代码?

小第刚学很多不懂。


--  作者:Bin
--  发布时间:2013/12/2 16:46:00
--  
继续加个个条件即可,假如对账列是逻辑列   and 对账=false  , 假如是字符串列  and 对账=\'未对账\'


Tables("出库明细表").Filter="订单客户 = \'" & kfsx.Text & "\' and 物料名称 like \'*" & cpmc.Text & "*\' and 物料编号 like \'*" & wlbhh.Text & "*\' and 型号规格 like \'*" & xhggg.Text & "*\' and and 对账=\'未对账\'

--  作者:kgdwxfmqj520
--  发布时间:2013/12/2 18:49:00
--  
能再祥细一点吗。。。。。没有试出来。
--  作者:有点甜
--  发布时间:2013/12/2 20:04:00
--  
 你是否有一列逻辑列,是对账的?

Tables("出库明细表").Filter="订单客户 = \'" & kfsx.Text & "\' and 物料名称 like \'*" & cpmc.Text & "*\' and 物料编号 like \'*" & wlbhh.Text & "*\' and 型号规格 like \'*" & xhggg.Text & "*\' and 对账列 <> true
[此贴子已经被作者于2013-12-2 20:04:26编辑过]

--  作者:kgdwxfmqj520
--  发布时间:2013/12/2 21:19:00
--  
谢谢了,以后多指点小第。