以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  提取框选记录的不同值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114346)

--  作者:刘林
--  发布时间:2018/2/3 19:46:00
--  提取框选记录的不同值
 Regions  = tb.DataTable.GetValues("考试名称|单位名称|考试室","","考试室") 

请问老师,这个代码我想用于提取表中框选记录的不重复值,请问filter怎么写

--  作者:有点甜
--  发布时间:2018/2/4 19:24:00
--  

你的框选是表格最左边的?如果是,比较麻烦。

 

建议你做一个临时列,直接勾选列而不是最左边,代码就比较好写。


--  作者:刘林
--  发布时间:2018/2/4 20:57:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180204205526.png
图片点击可在新窗口打开查看我就是想如图这样当框选了某几行,就提出所框选行的不同考试室,如图能提示所框选班级为01考试室和02考试室
[此贴子已经被作者于2018/2/4 21:01:22编辑过]

--  作者:有点甜
--  发布时间:2018/2/4 23:00:00
--  
Dim t As Table = Tables("表A")
Dim ls As new List(Of String)
For i As Integer = t.TopPosition To t.BottomPosition
    Dim r As Row = t.rows(i)
    If ls.Contains(r("第一列")) = False Then
        ls.add(r("第一列"))
    End If
Next
msgbox(ls.count)