专家坐堂-[求助]这个代码怎么写？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]这个代码怎么写？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93167)

--  作者：nazi3729
--  发布时间：2016/11/22 10:20:00
--  [求助]这个代码怎么写？
设置财务审批后无法更改行，但是其中一列‘账单回签’例外，
If e.Col.Name = "财务记账" Then \'只有经理才能审批
If User.Group <> "财务部" Then
e.Cancel = True
End If
ElseIf e.Row("财务记账") = True Then \'如果此行已经审批了,则禁止修改
e.Cancel = True
If e.Row("账单回签") Is Nothing
e.Cancel = False
End If
End If

--  作者：有点蓝
--  发布时间：2016/11/22 10:30:00
--

If e.Col.Name = "财务记账" Then \'只有经理才能审批
If User.Group <> "财务部" Then
e.Cancel = True
End If
ElseIf e.Row("财务记账") = True Then \'如果此行已经审批了,则禁止修改
e.Cancel = True
If e.Col.Name = "账单回签" And e.Row.Isnull("账单回签")
e.Cancel = False
End If
End If