以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据逻辑列,锁定其他列(以解决)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94951)

--  作者:npcwu
--  发布时间:2017/1/6 0:33:00
--  [求助]根据逻辑列,锁定其他列(以解决)
如题,根据第四列(逻辑列)如果已勾选,则锁定第1.2.3列。代码怎么写?
[此贴子已经被作者于2017/1/6 1:04:06编辑过]

--  作者:有点蓝
--  发布时间:2017/1/6 8:38:00
--  
PrepareEdit事件

Select Case
    Case "第一列","第二列","第三列"
        If e.Row("第四列") = True Then
            e.Cancel = True
        End If
End Select

--  作者:npcwu
--  发布时间:2017/1/21 2:12:00
--  
蓝老师。如果我要在窗口中,在全局中。先判断是那一类用户,根据用户类型判断某个逻辑列是否勾选,如果勾选才允许编辑部分窗口,这个代码怎么写?判断太多,有点绕不过来了??
--  作者:有点蓝
--  发布时间:2017/1/21 9:21:00
--  
http://www.foxtable.com/webhelp/scr/0609.htm

Select Case User.Type
    Case UserTypeEnum.Developer
        Output.Show("用户级别:" & "开发者")
    Case UserTypeEnum.Administrator
        Output.Show("用户级别:" & "管理员")
    Case UserTypeEnum.User
        Select Case e.Col.name
            Case "第一列","第二列","第三列"
                If e.Row("第四列") = True Then
                    e.Cancel = True
                End If
        End Select
End Select