请教:有条件锁定列 (已解决) - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教:有条件锁定列 (已解决)

共有14853人关注过本帖树形打印复制链接主题：请教:有条件锁定列 (已解决)

yangming

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

请教:有条件锁定列 (已解决) 发帖心情

Post By：2009/11/10 14:35:00 [只看该作者]

比如:当某列为"系统设置"时锁定,其它字符则不锁定,注意,并不是锁定此行的所有列,只是锁定这一列

[此贴子已经被作者于2009-11-10 15:49:06编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/11/10 14:53:00 [只看该作者]

锁定只能整行或整列。

单个单元格，用PrepareEdit事件，进行判断。

czy

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/11/10 14:56:00 [只看该作者]

'PrepareEdit事件代码
If e.Col.Name = "某列名称" AndAlso e.Row(e.Col.Name) = "系统设置" Then
e.Cancel = True
End If

这样也等于锁定这列了

yangming

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/11/10 15:48:00 [只看该作者]

这样就能达到作用了,呵呵

If e.Col.Name = "绑定列" AndAlso e.Row("属性") = "系统设定" Then
e.Cancel = True
End If

主题：请教:有条件锁定列 (已解决)