以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 请教:如何屏蔽 Ctrl + C 的数据 copy 功能  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11969)

--  作者:leibnitz
--  发布时间:2011/8/18 10:31:00
--  [求助] 请教:如何屏蔽 Ctrl + C 的数据 copy 功能

如题,请教狐狸爸爸和各位大侠:

 

如何屏蔽 Ctrl + C 的数据 copy 功能?

 

我尝试了在快捷菜单中设置,可是,似乎没有关于 “快捷键”  的设置啊。。。

我也尝试了,将标题 复制(&C) ---> 改做:复制(&Y),期待可以通过  Ctrl + Y 来引用。。。

结果都不能达到目标。 


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


 

用以下代码,也不行:

Dim mnu As RibbonMenu.ContextMenu
mnu = ContextMenus(
"Cell")
mnu.Items(
"Copy").Enabled = False

[此贴子已经被作者于2011-8-18 10:40:39编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/8/18 10:43:00
--  

直接在表属性设置,表属性中有个允许复制粘贴的选项,将其设置为False即可。

或者看看:

http://www.foxtable.com/help/topics/2303.htm

 


--  作者:blackzhu
--  发布时间:2011/8/18 10:53:00
--  

If e.Control = True AndAlso  e.KeyCode=Keys.c Then
    MessageBox.show("不能使用复制功能")
    e.Cancel = True
End If

在表属性的  KeyDown 中设置


--  作者:leibnitz
--  发布时间:2011/8/18 11:28:00
--  

多谢狐狸爸爸,还有 blackzhu:

嗯,这段代码可行

 

For Each dt As DataTable In DataTables
        dt.AllowClipBoard = False
Next

 

最妙的是,它并不影响 粘贴 以及 下选,然后 ctrl + D 的功能。

 

非常感谢!