主题：请教专家，求代码

在"窗口1"中的控件绑定了表A中的各列字段，要求当表A中的对应行锁定时，窗口控件的背景为灰色，表A中的行解锁后背景又变白色，该如何实现？求老师指导！

 要编写几个事件的代码，代码如下

 

If currentTable.current.Locked then

    Forms("xxx").Controls("xxxx").BackColor = Color.Gray

Else

    Forms("xxx").Controls("xxxx").BackColor = Color.White

End If

 

 要写代码的事件

 

CurrentChanged

DataRowLockedChanged

 

多谢，完成了。