Foxtable(狐表)用户栏目专家坐堂 → 希望软件不用复制


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

主题:希望软件不用复制

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


加好友 发短信
等级:三尾狐 帖子:659 积分:5357 威望:0 精华:0 注册:2018/5/19 22:27:00
希望软件不用复制  发帖心情 Post By:2018/10/19 12:02:00 [只看该作者]

希望A,B,C,D四个表中,相同列名“溯源码”不可被复制;   E表中,“子码”不可被复制; 
这个代码应该如何写;LoadUserSetting里面设置的。

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/10/19 14:01:00 [只看该作者]

表格keydown事件

If e.Table.Cols(e.Table.Colsel).name = "溯源码" AndAlso e.Control = True AndAlso e.KeyCode = Keys.C 
    e.Cancel = True
End If
[此贴子已经被作者于2018/10/19 15:12:12编辑过]

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


加好友 发短信
等级:三尾狐 帖子:659 积分:5357 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/10/19 14:54:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20181019145529.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/10/19 15:12:00 [只看该作者]

If e.Table.Cols(e.Table.Colsel).name = "溯源码" AndAlso e.Control = True AndAlso e.KeyCode = Keys.C 
    e.Cancel = True
End If

 回到顶部