以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口设计咨询  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97522)

--  作者:zchlln
--  发布时间:2017/3/14 9:55:00
--  窗口设计咨询
这面想要设计窗口 里面录入A列多行信息,按下按钮,表A显示对应A列多行内容
--  作者:有点蓝
--  发布时间:2017/3/14 11:10:00
--  

直接放一个表控件,绑定到表A,然后直接编辑保存即可

 

http://www.foxtable.com/webhelp/scr/1905.htm

 


--  作者:zchlln
--  发布时间:2017/3/14 11:16:00
--  
不是这个意思 我这面要查 表A 里面其中多行的数据 我想要在例如临时表B里面录入其中表A中A列的 按下按钮后 表A就查询显示 那多行的数据
--  作者:zchlln
--  发布时间:2017/3/14 12:20:00
--  
麻烦帮想想 O(∩_∩)O谢谢
--  作者:zchlln
--  发布时间:2017/3/14 13:27:00
--  
就是筛选 表A A列中 所有等于临时表B A列的数据 ,只要表A A列中的任意一行等于临时表B A列中的任意一行 就筛选出来
--  作者:有点色
--  发布时间:2017/3/14 14:42:00
--  

 

Tables("表A").Filter = "A列 = \'" & Tables("表B").Current("A列") & "\'"

 

 


--  作者:zchlln
--  发布时间:2017/3/14 14:49:00
--  
只显示 1个数据呢
--  作者:zchlln
--  发布时间:2017/3/14 15:00:00
--  
我这面测试了下 只能查找显示一个数据 表B A列我录入了多行的数据
--  作者:有点蓝
--  发布时间:2017/3/14 15:58:00
--  

Dim v As List(Of String) =  DataTables("表B").GetValues("A列")

Tables("表A").Filter = "A列 in (\'" & String.Join("\',\'",v.ToArray) & "\')"


--  作者:zchlln
--  发布时间:2017/3/31 9:28:00
--  
代码试了下 很好用 但我这面发现他的顺序和我表B的顺序不一致 怎么编写能达到一致呢?