说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

将RichTextBox 之中被选取的内容复制到剪贴簿-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
将RichTextBox 之中被选取的内容复制到剪贴簿-VB资料

如果不是写程序, 那么就是按下键盘 Ctrl+C。
当使用者按下 Ctrl+C 时, RichTextBox 会对自己送出 WM_COPY 的信息, 而接
着 RichTextBox 的窗口程序收到此一信息时, 便会将被选取的内容(包含文字及
图片)复制到剪贴簿&127;。
所以如果想要将 RichTextBox 中被选取的内容复制到剪贴簿, 只要对
RichTextBox 送出 WM_COPY 信息即可, 以下是程序撰写上的细节:
1. API 函数的声明式:
Const WM_PASTE = &H302
Const WM_CUT = &H300
Const WM_COPY = &H301
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (
ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As
Any) As Long

注:如果以上的声明放在「一般模块」底下, 应在 Const 之前加上 Public 保留
字, 并且将 Private 保留字去掉。

2. 调用例:
SendMessage RichTextBox1.hWnd, WM_COPY, 0, ByVal 0&

检查是否安装声卡 -VB资料 将 .flc 动画档放在某一个 hWnd 之中播放 -VB资料 截取屏幕图像-VB资料 开机,自动更换墙纸 -VB资料 控制PC喇叭 -VB资料 利用VB测声卡 利用VB进行多媒体程序设计初步 利用Visual Basic设计多媒体应用程序 满屏播放AVI文件-VB资料 平铺贴图背景 -VB资料 破解WINDOWS屏幕保护密码 -VB资料 巧用VB编程使XMPLAYER自动播放VCD VB取得 WAV 文件信息 趣味撞球VB5应用程序一例 VB如何从&quot;SOUND.DRV&quot;中提取声音 VB如何设定墙纸的显示方式? VB如何用API及MMSYSTEM.DLL播放AVI文件 VB如何知道计算机是否安装声卡? 设计简单的屏幕保护程序 -VB资料 使机箱内的小喇叭发出不同的声音 -VB资料 使用VB设计具有「动感」的命令图标栏 五彩缤纷的清屏效果-VB资料 系统是否支持声音 -VB资料 一个实用的VB屏幕程序 一个自动更换墙纸的小软件-VB资料 VB用 VB 设 计 VCD 播 放 器 VB用API播放 .wav 声音文件 VB用MCI指令进行多媒体编程 用VB5.0编写自己的MP3播放器 用VB6.0编写电脑抽奖程序 用VB6的双通道技术获得影碟片断 不懂.net,想学,但迷肓!!!请在职的程序员指点一下。 程序都隐藏了,加速键还起作用的程序如何做? 高分求购方案,急! 怎样去掉TTreeView中自动生产的滚动条 驳“学习JAVA钱途无量”的说法 在线等:如何防止C#应用程序第二个实例被启动? 请问谁有ActiveSkinV4.3(或者4V.2)的破解版?50分相赠~! 新手请教 用RMAN备份数据到磁带出错!!解决问题一定给分!!江湖救急啊!! 搞不明白的vc错误,气死我了,请高手指点。。。 上不了网 动态调用DLL是出现的问题,棘手中,待解决。 我要对Spreadsheet的数据进行排序,用javascript怎么写 200分求<构建Web解决方案---应用ASP.NET和ADO.NET>电子书,不是只有源码的,谢谢 用DECS连接AS/400数据库问题 GD网站大家一起随便贴 寻人启事:我有一个侄子,网名叫穿越沦陷的爱,经常跑到这个版块来玩,谁看见了他,让他来找我,急事! 请教高手!!利用二进制文件转换成文本文件进行加密,实现理论是什么? IP包过滤程序问题!!!请大虾帮忙!! sql loader里面不支持FILLER 双系统中,如何删除WIN2000?(98+2000) 实现了第一个愿望... vc和vc.net有什么区别,学了vc有必要学vc.net吗??? 急,数据库表的问题!!! 为什么在Run ActivX程序时出现问题? DLL窗体关闭问题 setfont设置Dialog字体无效,搞不明白,大侠指点 为什么我的Web应用程序项目启动不了,总是出现错误!!! 100分求教jtable问题??? 菜鸟送分问题,请哪位大侠讲讲Inte1.ResponseCode和Inte1.ResponseInfo 声音变了!怎么办啊??? 100分 请问怎么做“索引”? make求救 用ant编译pet store 时,出现问题,提示信息见内文?请帮忙。。。高分酬谢。 三个三角了 开心ing 散分 tmd,上了vsnet2003贼船了。原来vc6的都不好用了 找在linux下免费gui?? 打开窗口获取原窗口信息的问题 Cbuilder安装问题,急! HelloWorld大全[接龙] 我要写一个程序在前台不需要运行后台运行可以:就像平时邮件服务品一样在前台不需要运行,而后台是提供服务的,要怎样来实现 临时表问题 多媒体教学系统开发 jbuilder中关于类的import问题? 有关远程控制的,例如抓屏,限制功能键,限制alt+f4,等等,请去http://hedaofeng.jahee.com 如何取得IE地址栏的输入信息? 急求一段ASP与SQLserver2000处理代码! 怎么创建win32 static library并输出函数?谢谢 !!!!求排列组合的简洁算法(80分) 我要对Spreadsheet的数据进行排序,用javascript怎么写 WIN32异常求救????!!!!!! WE will give you a machine that works .We will exchange this one .将We will exchange this one.提到句首后变为了We will exchange this one for a machine that works.为什么要用for? 哦的士气温度护士气温 Von nun an,meinen Weg allein跟Lassen Sie mich allein.Komm nicht wieder zu mir! 何日遣冯唐的典故 I will save you from my ramble 题目"秋雨声声"能换成"秋雨"吗?为什么? 冯妇之死谁写的? 何日遣冯唐典故谁能用一句话概括? 常用的中文和英文搜索引擎有哪些?您能举出几个常用的例子吗 音乐风格有那些?帮忙举一下中文和英文的例子? There’s no chance of getting the job______you apply.1.unless 2.as if 3.when 4.in order that 埃及“世纪审判”再被推迟纽约商品交易所黄金期货市场4日上涨叙利亚强调将在战乱期间保障民众医疗条北京中小学禁售碳酸饮料引争议 被指管油价4日上涨美元对主要货币汇率4日下跌俄大力保护文化遗产穆沙拉夫获保释有望结束软禁 仍被阻止美对冲基金巨头因内幕交易被罚18亿美湖南3名遇害学童集体下葬 家属呼吁加湖南警方确认杀3儿童案疑犯仅一人 动运用大数据的方法3今年的金桔会自动浇水!开发区车检场启动通关快进模式台湾男艺人为BY2姐自杀?狮城姐妹花《极品模王》不担心“被下线”若出现系统性风险将再次干预市场男子散播春运免费乘车谣言遭处罚关于奥斯卡,好莱坞明星们在意的不是“两融余额破纪录十五连降金汇观潮节前广医三院孕妇血库告急异界翻译官手札巨星成长之路丑医末世女主重生记黑暗窥伺影旅天蓬元帅鉴宝神话重生女配曌君穿越宋青书赛里木湖旅游巴音布鲁克大草原旅游那拉提国家森林公园旅游天山天池旅游兴坪古镇旅游桂林漓江精华漂流旅游屯溪老街旅游迎客松旅游清凉台旅游光明顶旅游月沼旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘