- 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=117979)
-- 发布时间：2018/4/22 16:17:00
-- 跨表查询
想实现 在发票核销窗口中，根据核销单位，点击 对应单号的查询 弹出窗口 筛选广宣申请表中 该单位已审核的单号，请老师指点，谢谢。
此主题相关图片如下：qq截图20180422161531.jpg
此主题相关图片如下：qq截图20180422161531.jpg[此贴子已经被作者于2018/4/22 16:20:21编辑过]
-- 发布时间：2018/4/22 20:35:00
--
参考
http://www.foxtable.com/webhelp/scr/1058.htm
-- 发布时间：2018/4/25 21:45:00
--
你好 甜老师，此问题我用下拉窗口实现，如何在加上筛选逻辑列=true 麻烦您指点一下 Dim txt As String = Tables("发票核销表").Current("核销单位") Dim tbl As Table = Tables("窗口1_Table1") If txt = "" Then tbl.Filter = "" Else tbl.Filter = "核销单位 = \'" & txt & "\'" End If
[此贴子已经被作者于2018/4/25 21:45:53编辑过]
-- 发布时间：2018/4/25 21:47:00
--
Dim txt As String = Tables("发票核销表").Current("核销单位")
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
tbl.Filter = "逻辑列=true "
Else
tbl.Filter = "核销单位 = \'" & txt & "\' and 逻辑列=true "
End If
-- 发布时间：2018/4/25 21:52:00
--
真是神速 非常感谢 甜大大