首页 > > 程序设计 > VB >

用VB编程实现图像的熠熠生辉效果(4)

2008-02-23 06:39:14来源：互联网 阅读 ()

新老客户大回馈,云服务器低至5折

CopyMemory tmp, ByVal VarPtr(Col), 1
ExtractR = tmp
End Function
Private Function ExtractG(Col As Long) As Byte
'提取一个颜色值的绿色分量值，绿色分量的位置比红色分量高一字节
Dim tmp As Byte
CopyMemory tmp, ByVal VarPtr(Col) 1, 1
ExtractG = tmp
End Function
Private Function ExtractB(Col As Long) As Byte
'提取一个颜色值的蓝色分量值，蓝色分量的位置比绿色分量高一字节
Dim tmp As Byte
CopyMemory tmp, ByVal VarPtr(Col) 2, 1
ExtractB = tmp
End Function

　　本程序在Win2000 VB6.0下调试通过。

上一篇： VB6中使用错误处理对程序速度的影响
下一篇： VB实现文字“闪入”显示的特殊效果

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有

上一篇：基于VB的流媒体解码与播放技术

下一篇：开发工具大比拼之Visual C VS Delphi

相关文章

IDC资讯： 主机资讯 注册资讯 托管资讯 vps资讯 网站建设

网站运营： 建站经验 策划盈利 搜索优化 网站推广 免费资源

网站联盟： 联盟新闻 联盟介绍 联盟点评 网赚技巧

行业资讯： 搜索引擎 网络游戏 电子商务 广告传媒

网络编程： Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它

服务器技术： Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护

软件技巧： 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷

网页制作： FrontPages Dreamweaver Javascript css photoshop fireworks Flash

程序设计： Java技术 C/C++ VB delphi

网络知识： 网络协议 网络安全 网络管理 组网方案 Cisco技术

操作系统： Win2000 WinXP Win2003 Mac OS Linux FreeBSD

热门词条
linux下的c语言编程学java编程java并且什么是java语言java教学python和java哪个好java速成delphi法delphi源码java有什么用java招聘java入门视频java培训中心java开发是做什么的c语言难吗java开发实战经典java自学教程java 快速开发平台
最新资讯
热门关注
热门标签
AVPS谷歌移动友好算法POSTloadIEimg使用FTP软件COMHTTPHTMLem定义数据Classtimword