Foxtable(狐表)用户栏目专家坐堂 → 表格整行绘制怎么处理


  共有2497人关注过本帖树形打印复制链接

主题:表格整行绘制怎么处理

帅哥哟,离线,有人找我吗?
qhdspt
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:549 威望:0 精华:0 注册:2015/7/23 10:12:00
表格整行绘制怎么处理  发帖心情 Post By:2018/4/13 10:31:00 [只看该作者]

If 图片点击可在新窗口打开查看e.Col.name = "物资编码" AndAlso e.Row.Isnull("供应商") = False AndAlso e.Row.Isnull("来料单号") = False Then
    Dim dr As DataRow = e.Table.DataTable.find("物资编码 = '" & e.Row("物资编码") & "' and  供应商= '" & e.Row("供应商") & "'and 来料单号= '" & e.Row("来料单号") & "'and _Identify <> '" & e.Row("_Identify") & "'")
    If dr IsNot Nothing Then
        e.Style = "重复"
    End If
End If
这个代码只能绘制单元格,如果想整行都改变颜色,该咋改呢?谢谢老师们了 

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/13 10:32:00 [只看该作者]

把这个删除即可 e.Col.name = "物资编码" AndAlso

 回到顶部
帅哥哟,离线,有人找我吗?
qhdspt
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:549 威望:0 精华:0 注册:2015/7/23 10:12:00
  发帖心情 Post By:2018/4/13 10:38:00 [只看该作者]

谢谢老师的指导,完美!

 回到顶部