- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问表的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33935)
-- 发布时间：2013/5/27 14:11:00
-- 请问表的问题
我有二个表，其中编号列相同，第一个表的总数大于第二个表的总数，用什么方法把第二个表中没有的在第一张表中用颜色或标记表示出来，可以做到吗？我看了帮助大多数是把有的找出来，好象没有管没有的。
-- 发布时间：2013/5/27 14:37:00
--
项一下
有解吗
-- 发布时间：2013/5/27 15:07:00
--
-- 发布时间：2013/5/27 15:11:00
--
可以，表1用FIND查找每一个表2的编号。
-- 发布时间：2013/5/27 17:07:00
--
If e.Col.Name = "编号" Then
If e.Row.IsNull("编号") = False Then
Dim nms As List(of String) = DataTables("登记表").GetUniqueValues("编号 = \'","编号")
For Each nm As String In nms
If nm > "" Then
Dim dr As DataRow = DataTables("点表").Find("编号 = \'" & nm & "\'")
If dr IsNot Nothing Then
Dim dr1 As DataRow = DataTables("登记表").Find("编号 <> \'" & dr("编号") & "\'")
If dr1("编号").IsNull = False Then
e.Style = "样式1"
End If
End If
End If
Next
End If
End If
上述代码运行时报错，另外这样可以找出登记表与点表的不同处，并在登记表中绘制出来吗？
-- 发布时间：2013/5/27 17:09:00
--
例子发出来我帮你做吧.
-- 发布时间：2013/5/27 17:28:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目4.table |
谢谢了
-- 发布时间：2013/5/27 17:46:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目4.table |