如何用代码删除当前表筛选出的重复值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何用代码删除当前表筛选出的重复值

共有3520人关注过本帖树形打印复制链接主题：如何用代码删除当前表筛选出的重复值

czy66ds

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1684 积分：16374 威望：0 精华：0 注册：2013/7/31 13:03:00

如何用代码删除当前表筛选出的重复值 发帖心情

Post By：2013/9/2 11:58:00 [只看该作者]

我已用代码CurrentTable.RepeatFilter("商品编码",2)筛选除了重复值，如何编写代码删除这些重复值行？

czy66ds

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1684 积分：16374 威望：0 精华：0 注册：2013/7/31 13:03:00

Post By：2013/9/2 12:01:00 [只看该作者]

自己顶一下

Bin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/9/2 12:01:00 [只看该作者]

只能循环所有行,利用 datatables("XX").select 查找出重复的行然后删除.

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

程兴刚

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：7235 积分：40556 威望：0 精华：16 注册：2008/8/31 23:23:00

Post By：2013/9/2 12:11:00 [只看该作者]

Tables("表A").RepeatFilter("第一列", 2)
For i As Integer = Tables("表A").Rows.Count - 1 To 0 Step -1
Tables("表A").Rows(i).Delete
Next
Tables("表A").Filter = ""

Bin

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/9/2 12:11:00 [只看该作者]

以下是引用程兴刚在2013-9-2 12:11:00的发言：

Tables("表A").RepeatFilter("第一列", 2)
For i As Integer = Tables("表A").Rows.Count - 1 To 0 Step -1
Tables("表A").Rows(i).Delete
Next
Tables("表A").Filter = ""

好办法