- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 人员对比如何显示出新增或减少人员 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=23952)
-- 发布时间：2012/9/25 15:09:00
-- 人员对比如何显示出新增或减少人员
例：列Ａ有人员姓名 ７００人，列Ｂ 有人员姓名６５０人，想在列Ｃ显示出列Ｂ中缺少的姓名，如何实现？？？？？在线等
-- 发布时间：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编辑过]
-- 发布时间：2012/9/25 15:58:00
--
已经做了例子。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2012/9/25 16:55:00
--
非常感谢，非常好用