以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何禁止粘贴  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109065)
--  作者：wtt402
--  发布时间：2017/11/3 14:58:00
--  如何禁止粘贴
我希望某一列内容只允许手动输入，不希望别人粘贴进来。有什么代码或者哪里设置吗。。。

参考了

KeyDown、KeyDownEdit 事件

 

If e.Control = True AndAlso e.KeyCode=Keys.V AndAlso e.table.cols(e.table.colsel).name = "第一列" Then
    e.cancel = True
    vars("粘贴") = True
Else
    vars("粘贴") = False
End If

 

 

KeyPressEdit事件

 

If vars("粘贴") Then
    e.cancel = True
End If

已经解决了谢谢

[此贴子已经被作者于2017/11/3 15:06:31编辑过]