模拟关联后，筛选查询如何做 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 模拟关联后，筛选查询如何做

共有1900人关注过本帖树形打印复制链接主题：模拟关联后，筛选查询如何做

yfy13338431925

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：512 积分：4492 威望：0 精华：0 注册：2018/12/5 23:10:00

模拟关联后，筛选查询如何做 发帖心情

Post By：2019/4/13 16:33:00 [只看该作者]

甜哥，蓝老师，按照帮助文件做了一个模拟关联实例，但是加入查询后，没有查询结果，你帮我看看。谢谢老大了

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目46.zip

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107440 积分：546479 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2019/4/13 16:51:00 [只看该作者]

看看：http://www.foxtable.com/webhelp/scr/1906.htm

Dim kh As WinForm.ComboBox = e.Form.Controls("ComboBox1")

Tables("窗口1_Table1").Filter="客户编号 = " & kh.Text

yfy13338431925

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：512 积分：4492 威望：0 精华：0 注册：2018/12/5 23:10:00

Post By：2019/4/13 20:26:00 [只看该作者]

蓝老师，筛选可以了，筛选出来后的表好像不能继续添加行

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/4/14 11:14:00 [只看该作者]

以下是引用yfy13338431925在2019/4/13 20:26:00的发言：
蓝老师，筛选可以了，筛选出来后的表好像不能继续添加行

改成这样

Dim kh As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim ids = Tables("窗口1_Table1").DataTable.GetComboListString("_Identify", " not 客户编号 = " & kh.Text & " or 客户编号 is null")
Tables("窗口1_Table1").Filter="_Identify not in (" & ids.replace("|", ",") & ")"

下一主题 >> << 上一主题

主题：模拟关联后，筛选查询如何做