| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]行颜色问题请教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69869) |
| -- 作者：307587760 -- 发布时间：2015/6/12 0:38:00 -- [求助]行颜色问题请教 请问老师： 假设我有两张表A、B，这两个表之间是继承关系， B表的第1列，第2列，第3列继承A表的第1列，第2列，第3列 我现在 想让用户点击查错按钮后 对继承错误行进行标记，即：B表的第1列不等于A表第1列，或B表第2列不等于A表第2列，或B表第3列不等于A表第3列 在论坛搜到的都是在Drawcell中进行处理，但是我发现这个方法好像不太适合我 其一：我的设计思路是用户点击某个按钮后执行标记处理，而不是在加载表的时候就处理 其二：我假设的是我有两张表，实际上我有十多张表，每张表的每行都要进行遍历，这样速度会很慢，如果再对每个单元格进行颜色处理，我估计效率会很低 所以特来请教各位老师，有没有对整行进行颜色赋值的方法，或者有更好的思路，还望不吝赐教！ 以下是我两张表的处理代码： \'对父子表进行检查 For i As Integer=0 To Tables("原始合同目录").Rows.Count-1\'遍历父表每行数据 OriginalID =Tables("原始合同目录").Value(i,"本行ID") drs = DataTables("一拆合同目录").Select("[父ID] = " & OriginalID )\'查找子表和父表关联的数据 If drs IsNot Nothing Then For Each dr As DataRow In drs If dr("开发项目") =Tables("原始合同目录").Value(i,"开发项目") And dr("乙方")=Tables("原始合同目录").Value(i,"乙方") And dr("父合同名称")=Tables("原始合同目录").Value(i,"合同名称") Then\'检查父子表关联数据的关联值是否相同 Else \'关联值不相同的行进行标记（此处应该如何处理？） End If Next End If Next |
| -- 作者：狐狸爸爸 -- 发布时间：2015/6/12 8:57:00 -- 方法一： 你可以增加一个逻辑列，不符合的行，将此逻辑列设置为True即可。
方法二： 如果不想增加列，也可以： http://www.foxtable.com/help/topics/1776.htm
|