以文本方式查看主题

-  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=153333)

--  作者:wh420
--  发布时间:2020/8/7 10:43:00
--  关联筛选问题
Tables("表A").RelationFilter("姓名", DataTables("表B"), "名字", False)

用表A中的 姓名列 在表B的 名字列 中查找没有对应值的行,最后把“表B”没有的对应名字输出到列表以做提示用

请老师给一些代码提示,谢谢



--  作者:有点蓝
--  发布时间:2020/8/7 10:50:00
--  
Tables("表B").RelationFilter("名字", DataTables("表A"), "姓名", False)
Dim lit As new List(of String)
For Each r As Row In Tables("表B").rows
    If lit.Contains(r("名字")) = False Then lit.Add(r("名字"))
Next

--  作者:wh420
--  发布时间:2020/8/7 11:11:00
--  
Tables("表A").RelationFilter("姓名", DataTables("表B"), "名字", False)
这行代码对表A有筛选痕迹,我不想让表记录有任何变化,需要在后台执行这个筛选操作,并且筛选的是后台所有数据(SQL)

--  作者:有点蓝
--  发布时间:2020/8/7 11:13:00
--  
select 姓名 from 表A where 姓名 not  in (select 名字 from 表B)
--  作者:wh420
--  发布时间:2020/8/7 11:24:00
--  
For Each r As Row In Tables("表B").rows
    If lit.Contains(r("名字")) = False Then lit.Add(r("名字"))
Next
那 这个集合又如何针对后台数据呢?

--  作者:wh420
--  发布时间:2020/8/7 11:30:00
--  
用SQL语句找到的记录如何与下面代码搭配使用啊?
For Each r As Row In Tables("表B").rows
    If lit.Contains(r("名字")) = False Then lit.Add(r("名字"))
Next

--  作者:有点蓝
--  发布时间:2020/8/7 11:36:00
--  
Dim Products As List(Of String)
Products DataTables("表A").SQLGetValues("姓名 not  in (select 名字 from 表B)")
--  作者:wh420
--  发布时间:2020/8/7 12:41:00
--  
收到,问题解决,谢谢老师。

--  作者:wh420
--  发布时间:2020/8/7 17:47:00
--  
For Each Product As String In Products

如何把product集合里的值循环显示在listview列表中?

next

--  作者:有点蓝
--  发布时间:2020/8/8 8:21:00
--  
参考:http://www.foxtable.com/webhelp/topics/2771.htm,这里面的循环改为9楼的循环方式即可