全局表事件：
For Each dt As DataTable In DataTables
dt.GlobalHandler.DrawCell = True
Next
Select Case e.Table.Name
Case "副-分拣操作窗2_table1"
DataTables("分拣物料表").AddUserStyle("a", Color.Red , Color.black)
DataTables("分拣物料表").AddUserStyle("b", Color.SkyBlue , Color.black)
DataTables("分拣物料表").AddUserStyle("c", Color.GreenYellow, Color.black)
If e.Row("分拣状态") = "尚未分拣" Then
e.Style = "a"
ElseIf e.Row("分拣状态") = "部分分拣" Then
e.Style = "b"
ElseIf e.Row("分拣状态") = "分拣完成" Then
e.Style = "c"
End If
Case "副-分拣操作窗2_table2"
DataTables("分拣客户表").AddUserStyle("a", Color.Red , Color.black)
DataTables("分拣客户表").AddUserStyle("b", Color.SkyBlue , Color.black)
DataTables("分拣客户表").AddUserStyle("c", Color.GreenYellow, Color.black)
If e.Row("分拣状态") = "尚未分拣" Then
e.Style = "a"
ElseIf e.Row("分拣状态") = "部分分拣" Then
e.Style = "b"
ElseIf e.Row("分拣状态") = "分拣完成" Then
e.Style = "c"
End If
End Select
此主题相关图片如下：微信截图_20170927091852.png
此主题相关图片如下：微信截图_20170927091911.png
最后的显示效果，无论是代码样式还是控件属性样式都没起作用。
[此贴子已经被作者于2017/9/27 9:23:54编辑过]
加好友 
发短信
Post By：2017/9/26 19:36:00 [显示全部帖子]
