以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  一下子懵了  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70585)
--  作者：hbhb
--  发布时间：2015/6/24 17:32:00
--  一下子懵了
大师：请问如何获得表a的第一列的值不相同的行集合的代码？
--  作者：狐狸爸爸
--  发布时间：2015/6/24 17:37:00
--  
http://www.foxtable.com/help/topics/1353.htm
--  作者：xiaoohoo
--  发布时间：2015/6/24 17:37:00
--  

GetComboListString
--  作者：hbhb
--  发布时间：2015/6/24 17:49:00
--  
谢谢！不是某列的值，而是所有列，但某一列的值不重复的所有行？
--  作者：狐狸爸爸
--  发布时间：2015/6/24 17:56:00
--  

 http://www.foxtable.com/help/topics/2021.htm

 
--  作者：大红袍
--  发布时间：2015/6/24 17:58:00
--  

方法一：

 

For Each s As String In DataTables("表A").GetValues("第一列")
    Dim fdr As DataRow = DataTables("表A").Find("第一列 = \'" & s & "\'")
Next

 

方法二：

 

Dim ls As new List(Of String)
For Each dr As DataRow In DataTables("表A").Select("")
    If ls.Contains(dr("第一列")) = False Then
        ls.Add(dr("第一列"))
        msgbox(dr("第二列"))
    End If
Next
--  作者：hbhb
--  发布时间：2015/6/24 18:11:00
--  
谢谢！直接获得表a中第一列的值不重复的所有行的集合的代码怎么写？
是不是首先要获取第一列不重复的值集合，再用in 语句。
dim a as new list(of datarow) = datatables("表a").select("第一列  in (a,b,c)")  
有无简单的一句代码？
--  作者：hbhb
--  发布时间：2015/6/24 18:19:00
--  

单列数据字典DataMap 的键值不能重复，又不能包含判断吗？

害的老朽复查了一个下午呀，原来表中有空行的重复？

他妈的个巴子，比股市割肉还难受？