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


  共有2396人关注过本帖树形打印复制链接

主题:模拟关联后,筛选查询如何做

美女呀,离线,留言给我吧!
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


加好友 发短信
等级:超级版主 帖子:110579 积分:562791 威望: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("|", ",") & ")"


 回到顶部