以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  DrawCell问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125455)

--  作者:表叔
--  发布时间:2018/9/28 15:11:00
--  DrawCell问题
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:芜湖力钧工资表.table

If e.Col.Name = "用工状态" Then
    If e.Row("用工状态") = "退休聘用" Then
        e.Table.DataTable.AddUserStyle("退休聘用", Color.Gold, Color.Black)
        e.Style = "退休聘用"
    End If
    If e.Row("用工状态") = "即将退休" Then
        e.Table.DataTable.AddUserStyle("即将退休", Color.SpringGreen, Color.Black)
        e.Style = "即将退休"
        
    End If
    If e.Row("用工状态") = "离职" Then
        
        e.Table.DataTable.AddUserStyle("离职", Color.Red, Color.Black)
        e.Style = "离职"
    End If
End If
这是全局表DrawCell里的代码,但只对其中一张表起作用,需要全部起作用
[此贴子已经被作者于2018/9/28 15:39:59编辑过]

--  作者:有点甜
--  发布时间:2018/9/28 15:15:00
--  
请具体说明你要做什么。
--  作者:表叔
--  发布时间:2018/9/28 15:38:00
--  
If e.Col.Name = "用工状态" Then
    If e.Row("用工状态") = "退休聘用" Then
        e.Table.DataTable.AddUserStyle("退休聘用", Color.Gold, Color.Black)
        e.Style = "退休聘用"
    End If
    If e.Row("用工状态") = "即将退休" Then
        e.Table.DataTable.AddUserStyle("即将退休", Color.SpringGreen, Color.Black)
        e.Style = "即将退休"
        
    End If
    If e.Row("用工状态") = "离职" Then
        
        e.Table.DataTable.AddUserStyle("离职", Color.Red, Color.Black)
        e.Style = "离职"
    End If
End If
这是在全局表DrawCell中的代码,但不能对所有表起作用

--  作者:有点甜
--  发布时间:2018/9/28 15:41:00
--  

如果某个表格的drawcell事件写了代码,就不会再执行【全局表】的drawcell事件代码了。