Foxtable(狐表)用户栏目专家坐堂 → 列锁定问题


  共有2154人关注过本帖树形打印复制链接

主题:列锁定问题

帅哥哟,离线,有人找我吗?
lesliecheung912
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
列锁定问题  发帖心情 Post By:2014/12/12 12:55:00 [显示全部帖子]

表A有四列(名称,种类,数量,件数),名称和种类从另一个表中取值,选择名称后种类自动取过来。
当种类 = “水果”时,数量列锁定,件数列解锁,当种类等于其他值时,数量列解锁,件数列锁定。
请问代码应该写在什么事件里,代码应该怎么写呢?

 回到顶部
帅哥哟,离线,有人找我吗?
lesliecheung912
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/12/12 14:46:00 [显示全部帖子]

从另外一个表取值可以做到,但是锁定列怎么可以做到啊。如果是在PrepareEdit事件里面写,那得怎么写?
这样不行啊
If e.Col.Name = "产品名称" Then
    If Tables("表A").Current("种类") <> "水果"
        Tables("表A").Cols("数量").AllowEdit = False
        Tables("表A").Cols("数量").AllowEdit = True
    Else
        Tables("表A").Cols("数量").allowedit = True
        Tables("表A").Cols("件数").allowedit = False
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
lesliecheung912
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/12/12 15:02:00 [显示全部帖子]

想了半天还是没想明白,劳烦BIN大哥指点迷津

 回到顶部
帅哥哟,离线,有人找我吗?
lesliecheung912
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/12/12 15:14:00 [显示全部帖子]

我是想锁定列,而不是禁止他编辑,而是给列加个小锁,这样更形象,请问在表事件可以完成这种操作吗?


 回到顶部
帅哥哟,离线,有人找我吗?
lesliecheung912
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/12/12 15:24:00 [显示全部帖子]

明白了,谢谢

 回到顶部