以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  指定默认只对某列筛选重复值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98441)

--  作者:jick0526
--  发布时间:2017/3/30 4:44:00
--  指定默认只对某列筛选重复值
Syscmd.Filter.ShowSameValues()

老师,上面这个筛选重复值的代码,我如果想指定默认只对A列筛选重复值,代码该怎么改,谢谢!

--  作者:有点蓝
--  发布时间:2017/3/30 9:04:00
--  
参考:http://www.foxtable.com/webhelp/scr/2712.htm
--  作者:Rhonin
--  发布时间:2017/10/30 16:07:00
--  
那个请问下,怎么把这个筛选出来的值付给某一个控件,就是怎么提取出来
--  作者:有点甜
--  发布时间:2017/10/30 16:27:00
--  

 筛选后,读取表格的值

 

Dim t As Table = Tables("表A")
Dim ls As new List(Of String)
For Each r As Row In t.rows
    If ls.Contains(r("第三列")) = False Then
        ls.add(r("第三列"))
    End If
Next

For Each s As String In ls
    msgbox(s)
Next


--  作者:Rhonin
--  发布时间:2017/10/30 16:32:00
--  
那个,这个数据是在关联表里的,这样不能直接用table类型吧
--  作者:Rhonin
--  发布时间:2017/10/30 16:36:00
--  
不是不是,弄错了,代码没问题,但是为什么显示出来的是(集合)...
--  作者:有点甜
--  发布时间:2017/10/30 17:00:00
--  
以下是引用Rhonin在2017/10/30 16:32:00的发言:
那个,这个数据是在关联表里的,这样不能直接用table类型吧

 

请具体说明要显示到哪里,怎么显示?截图或者实例说明。


--  作者:Rhonin
--  发布时间:2017/10/30 17:31:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
如下图,在该窗口的副本表2中我需要把到站这一列的数据(图3)填入到页面集合2(填写车辆信息并完成)中的textbox7中,效果大体是济南、青岛、上海等等,但是具体显示出来的效果是(集合)(图2
图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/10/30 17:46:00
--  
Dim t As Table = Tables("表A")
Dim ls As new List(Of String)
For Each r As Row In t.rows
    If ls.Contains(r("第三列")) = False Then
        ls.add(r("第三列"))
    End If
Next
Dim s As String = String.Join("|", ls.ToArray)
msgbox(s)

--  作者:Rhonin
--  发布时间:2017/10/30 18:01:00
--  
多谢大佬甜