以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  麻烦各位解决一下咯  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33603)
--  作者：lhls1688
--  发布时间：2013/5/21 15:10:00
--  麻烦各位解决一下咯
请问一下：用代码实现锁定一列，怎么弄?
--  作者：1012931425
--  发布时间：2013/5/21 15:12:00
--  
 

AllowEdit

是否允许编辑列。
设为True允许编辑，设为False，禁止编辑，也就是锁定列。
如果没有明确设置，则继承DataCol的AllowEdit属性值。

例如锁定订单表的折扣列：

Dim cl As Col
cl = Tables("订单").Cols("折扣")
cl.AllowEdit = False
--  作者：XYT
--  发布时间：2013/5/21 15:13:00
--  
DataTables("订单").DataCols("折扣").AllowEdit = False