按钮
Tables("窗口1_Table1").DataSource = xxx
dataTables("窗口1_Table1").GlobalHandler.drawcell=true
全局表事件drawcell
if e.table.name = "窗口1_Table1" then
if e.col.name = "某某列"
if e.row("列1") = xxx
e.table.datatable.AddUserStyle(e.row("列1"), Color.Red, Color.White)
e.style = e.row("列1")
elseif e.row("列1") = xxx2
e.table.datatable.AddUserStyle(e.row("列1"), Color.blue, Color.White)
e.style = e.row("列1")
……
end if