- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]窗口表tb_ptx目录树对表A筛选 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173754)
-- 发布时间：2021/12/14 18:46:00
-- [求助]窗口表tb_ptx目录树对表A筛选
求助，窗口目录树当前节点 zfjm值 对表A zfjm 列值 筛选出多个子行
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表tb_ptx目录树对表a筛选.foxdb |
[此贴子已经被作者于2021/12/14 18:51:43编辑过]
-- 发布时间：2021/12/14 20:27:00
--
层级树没有事件，做不了这种功能，只能绑定本表做筛选。
-- 发布时间：2021/12/14 21:10:00
-- 回复：（有点蓝）层级树没有事件，做不了这种功能，只...
蓝主，求助1 和求助2 帮忙
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:表tb_ptx目录树对表a筛选 - 2.foxdb |
-- 发布时间：2021/12/14 21:23:00
--
模糊搜索参考like的用法：http://www.foxtable.com/webhelp/topics/0102.htm
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表tb_ptx目录树对表a筛选 - 2.zip |
-- 发布时间：2021/12/14 21:34:00
-- 回复：（有点蓝）模糊搜索参考like的用法：http://www...
无法在 System.String 和 System.Int32 上执行“=”操作。
下面CurrentChanged代码，报错上面，求助怎么修改
If Forms("zhu").Opened() \'一定要判断用于模拟关联表的窗口是否已经打开
Dim t As Table = Tables("zhu_Table1")
With Tables("zhu_Table2")
If .Current Is Nothing Then
t.Filter = "False"
Else
t.Filter = "zfjm = " & .Current("zfjm")
End If
End With
End If
[此贴子已经被作者于2021/12/14 21:38:04编辑过]
-- 发布时间：2021/12/14 21:39:00
--
先看3遍：http://www.foxtable.com/webhelp/topics/1284.htm
表达式中的日期用符号#括起来，数值则不需要任何符号括起来，这些和代码中的格式是一样的，唯一不同的是字符串用单引号括起来。
例如：
Tables("订单").Filter = "[产品] = \'PD01\'" \'字符用单引号括起来
Tables("订单").Filter = "[日期] = #3/17/1999#" \'日期用#括起来
Tables("订单").Filter = "[折扣] = 0.1" \'数值直接使用