以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]锁定列没有效果  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=35253)

--  作者:云淡风轻
--  发布时间:2013/6/27 12:03:00
--  [求助]锁定列没有效果

If CurrentTable IsNot Nothing AndAlso CurrentTable.ColSel >= 0 Then
    Dim dc As DataCol = CurrentTable.Cols(CurrentTable.ColSel).DataCol
    dc.AllowEdit = Not dc.AllowEdit
End If

 

没有锁定列的效果?


--  作者:Bin
--  发布时间:2013/6/27 12:05:00
--  
上例子看看,我测试是没有问题的.
--  作者:Bin
--  发布时间:2013/6/27 12:05:00
--  
我使用的是AfterSelChange事件
--  作者:云淡风轻
--  发布时间:2013/6/27 12:25:00
--  
不是,就是菜单锁定列的代码,我把他拷出来了,发现用不了。 我从别人那里接手的,把他的菜单里的锁定列的代码拷出来,不知是不是系统提供的还是他修改过了。
[此贴子已经被作者于2013-6-27 12:29:05编辑过]

--  作者:Bin
--  发布时间:2013/6/27 12:27:00
--  
这个代码意思是把 选择的列,设置锁定属性设置为相反
也就是说 未锁定的设置为锁定, 锁定的设定为解锁