主题：动态样式

动态绑定表的时候，这个表是【副本表】

Tables(e.Form.name & "_Table1").datasource = DataTables("项目开发进度汇总临时报表")

你要在表【项目开发进度汇总临时报表】的表属性写代码，或者【全局表事件】写代码才行。不能把代码写到窗口表事件

绑定表格以后，再添加样式，开启事件，如

Tables(e.Form.name & "_Table1").datasource = DataTables("项目开发进度汇总临时报表")
Dim dt As DataTable = Tables(e.Form.name & "_Table1").DataTable
dt.AddUserStyle("Green", Color.Green,Color.black)
dt.AddUserStyle("Pink", Color.Pink,Color.black)
dt.AddUserStyle("DeepSkyBlue", Color.DeepSkyBlue,Color.black)
dt.AddUserStyle("Red", Color.Red,Color.black)
dt.GlobalHandler.DrawCell = True