参考:
http://www.foxtable.com/help/topics/0629.htm
If tables("父表").Current("操作员") <> User.Name Then
e.Cancel = True
End if