以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]固定成果编号才夸表行筛选 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153624) |
-- 作者:miaoqingqing -- 发布时间:2020/8/17 17:19:00 -- [求助]固定成果编号才夸表行筛选 Dim t As Table = Tables("计划台账") With Tables("成果台账") If .Current Is Nothing AndAlso .Current("固定成果编号") = False Then 添加逻辑列是才执行下面代码求助 t.Filter = "False" Else Dim s = DataTables("中间表").GetComboListString("计划编号", "成果编号 = \'" & .Current("成果编号") & "\'").replace("|", "\',\'") t.Filter = "计划编号 in (\'" & iif(s>"", s, "-1") & "\')" End If End With
|
-- 作者:有点蓝 -- 发布时间:2020/8/17 17:32:00 -- 什么意思?没看懂 |
-- 作者:miaoqingqing -- 发布时间:2020/8/17 17:35:00 -- 回复:(有点蓝)什么意思?没看懂 AndAlso .Current("固定成果编号") = False Then 1楼代码添加上面逻辑条件无效,求助,逻辑列 勾选时,是,才行筛选
[此贴子已经被作者于2020/8/17 18:15:07编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/8/17 20:07:00 -- If .Current Is Nothing orelse .Current("固定成果编号") = False Then |