1,451
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
xjrflyer 2003-04-07
- 打赏
- 举报
我一开始就用过了，但不行啊，是不是我的系统有问题啊？？？？
knife_s 2003-04-06
- 打赏
- 举报
这样的话，你还可以有滚动条
knife_s 2003-04-06
- 打赏
- 举报
用API，记得把分给我，
首先在窗体中声明sendmessage这个API，我没装VB，用API游览器复制过来就行了，
dim aaa as long
aaa=sendmessage(text1.hwnd,EM_SETREADONLY,TRUE，BYVAL 0&) '将text1设为只读
首先在窗体中声明sendmessage这个API，我没装VB，用API游览器复制过来就行了，
dim aaa as long
aaa=sendmessage(text1.hwnd,EM_SETREADONLY,TRUE，BYVAL 0&) '将text1设为只读
xjrflyer 2003-04-06
- 打赏
- 举报
怎么我设置好了locked=true后还是可以复制和粘贴呢？？？
lsftest 2003-04-05
- 打赏
- 举报
试过了,设置了locked=true后应该只能复制文字而不能往里粘贴加入数据的,在右键弹出菜单中只有复制的选项有效,按粘帖的热键也没有效果,应该可以满足你的要求了吧..如果连复制也想禁止,考虑一下在窗口程序中拦截文本框的右键消息和键盘热键消息.
freehorse_1981 2003-04-05
- 打赏
- 举报
你就是locked=true,还是可以通过复制,粘贴加入数据,你还需要更改menu
zhenxizhou 2003-04-05
- 打赏
- 举报
Text1.Locked = True
Javaxhb 2003-04-05
- 打赏
- 举报
up
kongwzg 2003-04-05
- 打赏
- 举报
Text1.Enabled = False
StarLee 2003-04-05
- 打赏
- 举报
最好用label
pcwak 2003-04-05
- 打赏
- 举报
Locked = True
sakabi 2003-04-05
- 打赏
- 举报
用标签
xjrflyer 2003-04-05
- 打赏
- 举报
那还是可以往里面粘帖数据，并且如有垂直滚动条，这样垂直滚动条也不可以用了！！！
zsgzsgzsg 2003-04-05
- 打赏
- 举报
Locked = True
