如题。
试了，在项目事件中的AfterOpenProjectk中加代码：
For Each dt As DataTable In DataTables '各表样式统一设置
DataTables(dt.Name).SysStyles("CurrentRow").BackColor = Color.LawnGreen
DataTables(dt.Name).SysStyles("Alternate").BackColor = Color.Gainsboro
'DataTables(dt.Name).SysStyles("ModifiedCell").BackColor = Color.Red ——这一句为什么没用呢？所以试了下一句
DataTables(dt.Name).AddUserStyle("红底白字", Color.Red, Color.White)
Next
在全局表事件中的DrawCell中加代码：
If e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then
e.Style = "红底白字"
End If
试了还是没用。只有点了系统菜单中的“标记”才行。笨啊~牛角尖...
加好友 
发短信
Post By：2017/6/1 19:17:00 [显示全部帖子]
