主题：[求助]能否将表事件的代码改写到全局表事件

 首先，你需要开启对应的全局表事件。

 后这样写。

 If _UserGroup = "开发" Then
    e.Cancel = False
 Else
    e.Cancel = True
 End If

----------------------------------

 e.DataTable.SysStyles("Frozen").BackColor = Color.LightCyan
 e.DataTable.SysStyles("CurrentRow").BackColor = Color.Blue
 e.DataTable.SysStyles("CurrentRow").ForeColor = Color.White
 
(这里只需要设置一次就行了，建议写在afteropenproject事件里，代码要变一下)

for each dt as datatable in datatables
    dt.SysStyles("Frozen").BackColor = Color.LightCyan
    dt.SysStyles("CurrentRow").BackColor = Color.Blue
    dt.SysStyles("CurrentRow").ForeColor = Color.White
next

--------------------------------------------------

开启全局表
http://www.foxtable.com/help/topics/0671.htm

 改一下就可以了。全局表事件里。

 DataTables(e.Table.name).SysStyles("Frozen").BackColor = Color.LightCyan
 DataTables(e.Table.name).SysStyles("CurrentRow").BackColor = Color.Blue
 DataTables(e.Table.name).SysStyles("CurrentRow").ForeColor = Color.White