主题:文本框的问题
singleminded
[专家分:490] 发布于 2005-11-15 17:49:00
如果让文本框不能使用,复制粘贴???
也就是当点击右键时,不会出现上下菜单
谢谢
回复列表 (共4个回复)
沙发
zrs797246 [专家分:190] 发布于 2005-11-16 01:46:00
If e.Button = MouseButtons.Right Then
Dim str As New ContextMenu
str.Dispose()
TextBox1.ContextMenu = str
End If
板凳
singleminded [专家分:490] 发布于 2005-11-16 09:06:00
谢谢
还有其它方法吗
3 楼
zrs797246 [专家分:190] 发布于 2005-11-16 17:43:00
你是要做什么用的?
我觉的这个已经很简单了!!
你想要的是什么样的内容??
4 楼
5653325 [专家分:40] 发布于 2005-11-25 08:47:00
TextBox1_MouseDown里面添加这句代码 也能实现楼主的要求(如果用键盘在加句代码)
If e.Button = MouseButtons.Right Then MsgBox("你干吗?")
我来回复