以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]筛选问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138244)

--  作者:seal51
--  发布时间:2019/7/26 9:48:00
--  [求助]筛选问题
Tables("付款表").Filter = "未付金额 > 0"
Tables("付款表").Filter = "未付金额 <> 0"
大家好, 这个筛选怎么没有用呢?未付金额为0的为何还显示?

--  作者:有点蓝
--  发布时间:2019/7/26 10:09:00
--  
Tables("付款表").Filter = "未付金额 <> 0 and 未付金额  is not null"
--  作者:seal51
--  发布时间:2019/7/26 11:39:00
--  
未付金额没有空值!单独做了一个列子, 筛选OK, 但是我的系统里明明未付金额为0, 就是不筛选, 奇了怪了!
--  作者:有点蓝
--  发布时间:2019/7/26 11:56:00
--  
也许是0.00000001这种值呢?看起来像0而已


--  作者:seal51
--  发布时间:2019/8/12 9:07:00
--  
Tables("采购单查询_采购明细表").Filter = "采购单号 = \'" & Tables("排产主表.排产明细表").Current("采购单号") & "\'"
Tables("采购单查询_采购明细表").Filter = "产品ID = \'" & Tables("排产主表.排产明细表").Current("产品ID") & "\'"

筛选条件是采购单号=采购单号,并且产品ID=产品ID 如何写代码?

--  作者:有点蓝
--  发布时间:2019/8/12 9:30:00
--  
Tables("采购单查询_采购明细表").Filter = "采购单号 = \'" & Tables("排产主表.排产明细表").Current("采购单号") & "\' and 产品ID = \'" & Tables("排产主表.排产明细表").Current("产品ID") & "\'"
--  作者:seal51
--  发布时间:2019/8/12 9:48:00
--  
谢谢老师!另外一个问题, 逻辑列,打勾或者去掉勾, 马上保存, 如何写代码, 放在什么事件里?
--  作者:有点蓝
--  发布时间:2019/8/12 10:13:00
--  
datacolchanged事件

‘其它代码处理
e.datarow.save

--  作者:seal51
--  发布时间:2019/8/13 10:08:00
--  
在菜单里做一个重置列的按钮,针对所有表所有列,就像狐表菜单里的重置列一样, 代码是哪个呢?
RaiseDataColChanged()
RaiseDataColChanged(DataRow)
RaiseDataColChanged(Filter)

--  作者:有点蓝
--  发布时间:2019/8/13 10:18:00
--  
Dim t As Table = CurrentTable
t.DataTable.DataCols(t.Cols(t.ColSel).Name).RaiseDataColChanged()