以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 人员对比如何显示出新增或减少人员 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23952) |
||||
-- 作者:181741400 -- 发布时间:2012/9/25 15:09:00 -- 人员对比如何显示出新增或减少人员 例:列A有人员姓名 700人,列B 有人员姓名650人,想在列C显示出列B中缺少的姓名,如何实现?????在线等 |
||||
-- 作者:lin_hailun -- 发布时间:2012/9/25 15:20:00 -- Dim names1 As List(Of String) = DataTables("表").GetUniqueValues("", "列A") Dim names2 As List(Of String) = DataTables("表").GetUniqueValues("", "列B") Dim names3 As New List(Of String) For Each name As String In names1 If Not names2.Contains(name) Then names3.add(name) End If Next For i As Integer = 0 To names3.Count - 1 Tables("表").Rows(i)("列C") = names3(i) Next [此贴子已经被作者于2012-9-25 15:57:31编辑过]
|
||||
-- 作者:lin_hailun -- 发布时间:2012/9/25 15:58:00 -- 已经做了例子。
|
||||
-- 作者:181741400 -- 发布时间:2012/9/25 16:55:00 -- 非常感谢,非常好用 |