以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]这段代码怎么没效果呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15688)

--  作者:beiliyukun
--  发布时间:2012/1/6 14:11:00
--  [求助]这段代码怎么没效果呢

PrepareEdit事件

If e.Col.Name = "确定"
    If   e.Row("处理结果") = "打款" Or e.Row("处理结果") = "退款" Then
        If User.Group <> "经理" Then
            e.Cancel = True
        End If
    End If
End If

就是说经理能操作 确定 这列的前提是:处理结果 这列的值必须是 退款 或 打款,这段代码写上去,处理结果 是啥都能操作 确定 列,确定列是逻辑列

 


--  作者:czy
--  发布时间:2012/1/6 14:13:00
--  

将or改成AndAlso试试

 


--  作者:beiliyukun
--  发布时间:2012/1/6 14:59:00
--  

改了但是还是不行,郁闷了,帮我看一下吧,表B的事件

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:实验.table


--  作者:狐狸爸爸
--  发布时间:2012/1/6 15:08:00
--  

门锁了,猜一下:

 

If e.Col.Name = "确定"
    If User.Group = "经理" Then
        If e.Row("处理结果") <> "打款" AndAlso e.Row("处理结果") <> "退款" Then
            e.Cancel = True
        End If
    Else
        e.Cancel = True
    End If
End If