- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 显示重复值，有这个功能的代码吗？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25294)
-- 发布时间：2012/11/6 8:15:00
-- 显示重复值，有这个功能的代码吗？
菜单里有个“显示重复值”，这个功能蛮好用，能有实现该功能的代码不？
背景：一人事系统，工号是重复使用的，001号员工离职后，该工号可以给后入职的人使用
进出的人多了，工号会有重复给不同在职人员使用的情况，想做个筛选，对重复工号一目了然的凸显，便于修改
此主题相关图片如下：1.png
此主题相关图片如下：2.jpg
-- 发布时间：2012/11/6 8:16:00
--
菜单模板里能找到的Syscmd.Filter.ShowSameValues()
[此贴子已经被作者于2012-11-6 8:17:33编辑过]
-- 发布时间：2012/11/6 8:25:00
--
以下是引用sgs在2012-11-6 8:16:00的发言：
菜单模板里能找到的Syscmd.Filter.ShowSameValues()
[此贴子已经被作者于2012-11-6 8:17:33编辑过]
谢谢回复
怎样在命令中指定表？
比如我要对“员工信息”表做这个功能，咋整？
-- 发布时间：2012/11/6 8:29:00
--
MainTable = Tables("员工信息")
With Tables("员工信息")
.Select(.RowSel,.Cols("某某列").Index）
End With
Syscmd.Filter.ShowSameValues()
-- 发布时间：2012/11/6 8:51:00
--
以下是引用狐狸爸爸在2012-11-6 8:29:00的发言：
MainTable = Tables("员工信息")
With Tables("员工信息")
.Select(.RowSel,.Cols("某某列").Index）
End With
Syscmd.Filter.ShowSameValues()
MainTable = Tables("员工信息")
With Tables("员工信息")
.Select(.RowSel,.Cols("某某列").Index）
End With
Syscmd.Filter.ShowSameValues()
好用，感谢！