以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于table里对非管理员需要显示***的问题。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137764) |
-- 作者:ycwk -- 发布时间:2019/7/15 10:18:00 -- 关于table里对非管理员需要显示***的问题。 本来在表里的drawcell事件里,用下面的代码使得帐户和密码对 非管理员或非所有者 显示为***,但是一用鼠标点击,明文就出来了,有什么好办法么? Dim str As String =e.Row("管理员") If e.Col.Name = "密码" Or e.Col.Name="用户名" Then \'请改为实际列名 If User.group <> "管理员" AndAlso str.Contains(User.Name)=False Then \'如果不是服务器对应的管理员 e.Text = "****" \'则修改显示内容 End If End If
|
-- 作者:有点蓝 -- 发布时间:2019/7/15 10:42:00 -- 锁定这一列,或者使用代码锁定单元格,不能进行编辑即可 |
-- 作者:ycwk -- 发布时间:2019/7/15 10:47:00 -- 锁定后,用ctrl+c复制也可以复制到明文啊 |
-- 作者:有点蓝 -- 发布时间:2019/7/15 11:12:00 -- 把ctrl+c也屏蔽掉http://www.foxtable.com/webhelp/topics/1642.htm If e.Control = True AndAlso e.KeyCode = keys.c Then e.cancel = True End If |