以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  可以编辑列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144582)
--  作者：nxqtxwz
--  发布时间：2019/12/24 22:24:00
--  可以编辑列

下面的例子是校长不能编辑A、B列，办公室主任不能编辑C、D列，如果我改成：校长可以编辑A、B、C列，办公室主任可以编辑C、D列怎么改呢？

 

Select  Case user.IsRole
     Case  "校长"
          Select  Case e.Col.Name
             Case "A","B" 

                 e.Cancel = True
          End  Select
     Case "办公室主任"
          Select  Case e.Col.Name
             Case "c","d" 
                 e.Cancel = True
          End  Select
 End  Select
--  作者：有点蓝
--  发布时间：2019/12/24 22:27:00
--  
If user.IsRole("校长") Then
    Select  Case e.Col.Name
        Case "A","B","C"
        Case Else
            e.Cancel = True
        End  Select
    ElseIf user.IsRole("办公室主任") Then
        Select  Case e.Col.Name
            Case "c","d"
            Case Else
                e.Cancel = True
            End  Select
        End If
--  作者：nxqtxwz
--  发布时间：2019/12/25 8:15:00
--  

Select Case语句能否嵌套呢？

 

Select Case 变量一

    Select Case 变量
        Case 值1
           代码1
        Case 值2
           代码2
        Case 值3
           代码3
        Case Else
          代码X
    End Select

   End Select
--  作者：有点蓝
--  发布时间：2019/12/25 8:38:00
--  
可以，试试不就知道了
--  作者：nxqtxwz
--  发布时间：2019/12/25 10:30:00
--  

不好意思，我昨晚试了没成功，可能是哪出错了。谢谢老师指导。
--  作者：有点蓝
--  发布时间：2019/12/25 10:33:00
--  
贴出自己完整代码说明