以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]如何去除多余的重复的数据行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78895) |
-- 作者:农村人 -- 发布时间:2015/12/19 20:03:00 -- [求助]如何去除多余的重复的数据行 以下代码能够返回不重复的联系方式,那么,如何去除多余的重复的数据行呢? Dim Products As List(Of String) Products = DataTables("货运信息").GetValues("联系方式") For Each Product As String In Products Output.Show(Product) Next
|
-- 作者:lsy -- 发布时间:2015/12/20 8:21:00 -- Dim t As Table = CurrentTable Dim lst As New List(Of String) For i As Integer = t.Rows.Count - 1 To 0 Step - 1 If lst.Contains(t.Rows(i)("第一列")) Then t.Rows(i).Delete Else lst.Add(t.Rows(i)("第一列")) End If Next
|
-- 作者:大红袍 -- 发布时间:2015/12/20 11:54:00 -- 筛选后,删除
http://www.foxtable.com/help/topics/2712.htm
|