以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]控制列的权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=27763)
--  作者：ddlzq
--  发布时间：2013/1/9 17:11:00
--  [求助]控制列的权限
各位老师：
 我做的表中有许多列，比如A B C D E F这些列名。我想控制D列填写了内容后，A B C列不能填写任何内容，D E列不受影响
我用的是

PrepareEdit

If e.Row.Isnull("D") =False And e.col.name = "A" Then

e.cancel = True

else

If e.Row.Isnull("D") =False And e.col.name = "B" Then

e.cancel = True

end if

end if

但列很多，要一个一个写，请问如何做较简单的代码可以控制指定列按某列控制权限？（我是编程初学者，见笑）
--  作者：lin_hailun
--  发布时间：2013/1/9 18:19:00
--  
 select case e.col.name
     case "A", "B", "C"
         If e.Row.IsNull("D") Then
             e.cancel = true
         End If
 end select
--  作者：ddlzq
--  发布时间：2013/1/10 13:40:00
--  
感谢lin_hailun老师
--  作者：ddlzq
--  发布时间：2013/1/10 13:40:00
--  
感谢lin_hailun老师