以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  权限管理  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117515)
--  作者：linyunu
--  发布时间：2018/4/13 19:32:00
--  
试试这个
Select Case e.Col.Name
   Case "实际_开始日期","实际_结束日期"
If _UserName <> "管理员" or _UserName <> "节点负责人" Then
    e.cancel = True
End If
End Select
--  作者：有点蓝
--  发布时间：2018/4/13 22:22:00
--  
Select Case e.Col.Name
    Case "实际_开始日期","实际_结束日期"
        If _UserName <> "管理员" AndAlso _UserName <> "节点负责人" Then
            e.cancel = True
        End If
End Select
--  作者：有点蓝
--  发布时间：2018/4/14 14:53:00
--  
看4楼，照抄
--  作者：有点蓝
--  发布时间：2018/4/14 15:38:00
--  
汗，你这个“节点负责人”是一个列名，而不是登录用户的名称，麻烦描述问题描述清楚

Select Case e.Col.Name
    Case "实际_开始日期","实际_结束日期"
        If _UserName <> "管理员" AndAlso _UserName <> e.Row("节点负责人") Then
            e.cancel = True
        End If
End Select
--  作者：有点蓝
--  发布时间：2018/4/14 16:05:00
--  
我测试没有问题。

删除bin目录，重启项目测试
--  作者：有点蓝
--  发布时间：2018/4/14 16:53:00
--  
代码的效果就是只锁定这2列
--  作者：有点蓝
--  发布时间：2018/4/14 16:58:00
--  
按什么条件锁定？麻烦一次性把问题描述清楚！！
--  作者：有点蓝
--  发布时间：2018/4/14 17:45:00
--  
If _UserName <> "管理员"
    Select Case e.Col.Name
        Case "实际_开始日期","实际_结束日期"
            If _UserName <> e.Row("节点负责人") Then
                e.cancel = True
            End If
        Case Else
            e.cancel = True
    End Select
End If