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

VB获得位图文件的信息

HTML文档下载 WORD文档下载 PDF文档下载
VB获得位图文件的信息

在Form中添加一个Picture控件和一个CommandButton控件,在Picture控件中加入一个位图文件,将下面代码加入其中:
Private Declare Function GetObject Lib "gdi32" Alias "GetObjectA" _
(ByVal hObject As Long, ByVal nCount As Long, lpObject As Any) _
As Long
Private Declare Function GetBitmapBits Lib "gdi32" (ByVal hBitmap As Long, _
ByVal dwCount As Long, lpBits As Any) As Long

Private Type BITMAP
bmType As Long
bmWidth As Long
bmHeight As Long
bmWidthBytes As Long
bmPlanes As Integer
bmBitsPixel As Integer
bmBits As Long
End Type

Private Sub Command1_Click()
Dim hBitmap As Long
Dim res As Long
Dim bmp As BITMAP
Dim byteAry() As Byte
Dim totbyte As Long, i As Long
hBitmap = Picture1.Picture.Handle

res = GetObject(hBitmap, Len(bmp), bmp) '取得BITMAP的结构

totbyte = bmp.bmWidthBytes * bmp.bmHeight '总共要多少BYTE来存图
ReDim byteAry(totbyte - 1)
'将Picture1中的图信息存到ByteAry
res = GetBitmapBits(hBitmap, totbyte, byteAry(0))

Debug.Print "Total Bytes Copied :"; res
Debug.Print "bmp.bmBits "; bmp.bmBits
Debug.Print "bmp.bmBitsPixel "; bmp.bmBitsPixel '每相素位数
Debug.Print "bmp.bmHeight "; bmp.bmHeight '以相素计算图象高度
Debug.Print "bmp.bmPlanes "; bmp.bmPlanes
Debug.Print "bmp.bmType "; bmp.bmType
Debug.Print "bmp.bmWidth "; bmp.bmWidth '以相素计算图形宽度
Debug.Print "bmp.bmWidthBytes "; bmp.bmWidthBytes '以字节计算的每扫描线长度
End Sub
Android开发之Java并发包集合类性能分析 Android开发之Java集合类性能分析 Android开发之Java虚拟机原理和内存分配 Android开发之Java基础系列教程目录 Android Theme主题样式开发注意点 Android 3.0开发用的平板推荐 android.resource://这个Uri你知道吗 ADT插件的10.0.1必须要Eclipse 3.5才能升级 Android线程优先级设置方法 Android Zip文件解压缩代码 Android开发之设置断点单步调试 Android裁剪图片最简单方法 Android平台待开发软件列表 Android开发知识-3月13日总结 Android平板开发注意点 Android 3.0自带的天气预报例子代码 Loader和Fragment使用示例代码 LoaderManager - Android 3.0新特性 帮助ADT改进DDMS中的Logcat中文乱码问题 Fragment API将兼容Android 1.6到3.0 通过Linux Shell实现Android横竖屏切换 Android高手应该精通哪些内容? Android 2.2开始resources.arsc有改变 分析你的Android ANR错误 API Level对照表,更新至2.3.3 ProcessDialog结合Thread处理耗时操作 Fragment示例代码 DialogFragment示例代码 ActionBar示例代码 (二) Action Bar示例代码 (一) ActionBar使用方法 - Android活动栏(二) 软件发布:信息群发圣手(Bbs+Email+icq)免安装版 软件发布:网络主机扫描软件(HostScan) 软件发布:ADSL 超频奇兵 软件发布:绿幽灵高速多功能浏览器 软件发布:辟邪脸谱 软件发布:邮件群发机 软件发布:拯救地球 软件发布:九城的修行器 软件发布:龙飞定时器 软件发布:加密vfp的exe,防止反编译 软件发布:“破解注册表编辑器” 软件发布:神奇注册表 软件发布:CDWizard(光驱精灵.NET) 软件发布:神通 2001 豪华版 软件发布:VB6历史文件清理器 菜单问题!!送分哟! 请问PB7.0中,Freeform格式的数据窗口中,为何按滚动条,数据不是滚动到第一页就是最后一页?如何实现自由滚动? B/S结构用何东东编最快? 关于mpeg-4 请问各位大虾:CBitmap对象如何写入一个BMP文件? 对面的大哥看过来!高分征解有关SetWindowPos的问题。 如何刷新文件内容的缓冲? 昨天一夜星际~~~后 一个捉摸的问题,、高分请解决! 在WEBLOGIC5.1上发布EJB1.1的一个小问题 请教,如何用jbuilder 写midas的服务器, 我们公司一个程序员的头式太难看了,我每次见他就恨不得拿剃头的推子给他剃光光! 寻最好的ftp软件 autoCAD的问题 找本站里面《程序员测试软件》的注册码 刚毕业的不能报? .lib 文件到底是怎么回事?如何查看它的内容? 请问,下面的警告提示什么意思(关于sybase) 那位可以给我描述一下“代表”? 请问有WINsock编程高手么,帮我看一下下面的程序 紧急招聘PB程序员(成都) 关于产品序列号的问题……想了很久了。 这里有几个问题,能者请进! 请教VC项目开发经验 如何让下载的程序变成免费的? 请问有Pdf到Text的转化的源代码么? 能否让下载的程序变成免费的? 请问怎样才能自动复制文本框中的文本到剪贴板? 是否可用简体中文的VB开发翻体中文的应用程序? 使用JavaMail转发邮件 在servlet中是不是不可以引用其它的类中的函数.(这个类不是派生于HttpServlet) 为什么买书配送的光盘文件在BCB工程中打开后不让修改(打开前已转换为存档文件了)? 请教使用OPEN CLIENT 的一个小问题 索求算法 请问能否将下载的程序变成免费的? 现在学习C#不晚吧,:P 艾华读一本180页的故事书,第一天看了全书的五分之二,第二天看了全书的四分之一,第三天应从第几也看起? 小丽计划三天看完一本280页的书,第一天看了全书的七分之二,第二天看了第一天的五分之三,第三天小丽应从第 王大伯家购进2分之1吨煤,第一天用去总数的4分之1,第二天用去总数的5分之1,剩下的占总数的几分之几? 小明看一本故事书,上午看了全书的三分之一,下午看了全书的五分之二,这本书共有120页,小明晚上接着看这本书应从第几页开始看? 小丽看一本书,三天看完.第一天看全书的18分之7,第二天看了全书的9分之4.第三天看了全书的几分之几 有7/8吨煤,第一天用去1/3,第二天用去2/5,还剩下几分之几?1-(1/3+2/5)=4/15对吗? 一本故事书共有180页 小明第一天看了全书的三分之一 第二天看了余下的三分之一,第三天应该从第几页看起? 小丽计划三天看完一本书,第一天看了全书的7分之2,第二天看了全书的5分之3.如果她第三天实际看了16页那么第一天看了多少页? 张师傅加工一批零件第一天完成了总数的15分之7第二天比第一天多加工了18个这批零一共多少个 小明三天看完一本故事书,第一天看了全书的五分之二还少8页,第二天看了全书的三分之一还多28页,第三天看了100页.这本故事书一共有多少页?用比例做 小丽计划三天看完一本书,第一天看了全书的7分之2,第二天看了第一天的5分之4,那么小丽前两天看了全书的几分之几?第三天小丽应看完全书的几分之几? 秦师父两天加工完一批零件,第一天完成了总数的十五分之七,第二天比第一天多加工了18个.这批零件有多少个 一本故事书有320页,第一天看了3/8第二天看了1/5,第三天应从第几页看起? 有一本故事书90页,小林计划18天读完,平均每天看这本书的几分之几? 王师傅加工一批零件,第一天完成的个数是未完成个数的2分之1,如果再加工240个,就可以成这批零件的50%,这批零件有多少个 一本书有150页,小王第一天看了总页数的10分之1,第二天看了总页数的15分之1,第三天应从第几页看起?人体血液占体重的13分之1,血液里约3分之2的水,爸爸的体重是78Kg,他的血液大约含水多少Kg?( 一本300页的故事书,小华计划30天看完,那么他6天能看这本书的几分之几 王师傅加工一批零件,第一天加工了总数的5分之1,第二天加工总数的15分之2,还剩下160个,这批零件共有多 一本书有150页,小王第一天看了总数的1/10,第二天看了总数的 1/15,第三天应从第几页看起? 小宁看一本书故事书,9天看了这本书的一半.照这样的速度,他6天看了这本书的几分之几?.我家小学生用我的百度号问的.我现在才知道.无语了, 王师傅加工一批零件 第一天加工了总数的3分之1,第二天加工的个数是第一天的2分之1第二天加工了总数的几分之几? 小明看一本150页的故事书,第一天看了全书的五分之一,第二天看了全书的六分之一,第三天应从第几页开始看? 小明15天看完一本故事书,平均每天看这本书的几分之几?4天呢?6天呢? 王师傅加工一批零件,第一天完成总数的1/4又7第二天完成余下的2/5多2个,还剩全部的5/18,共多少零件? 一本故事书,小明第一天看了总页数的1/3,第二天看丁总页数的1/4,还有50页没看,他第三天应从第几页看起. 小强看完一本故事书要6天时间,平均每天看几分之几?3天看几分之几?5天呢? 王师傅加工一批零件 第一天完成总数的1/4又7第二天完成余下的2/5多2个,还剩19个,共多少零件? 一本故事书,小明第一天看了总页数的3分之一,第二天看了总页数的4分之一,还有50页没有看,第三天应从第几页看起? 一本150页发故事书,第一天读了五分之二,第二天读了余下的三分之一.第二天读了多少页? 加工一批零件,第一天完成总数的的1/4多7个、第二天完成余下的2/5多2个,还剩全部的5/18,共多少零件? 一筐苹果重72千克.第一天吃了它的8分之一,第2天吃了它的9分之一,还剩下这筐苹果的几分之几?第一天吃了多少千克苹果快 小明有一本故事书,第一天看了全书的1/6,第二天看了32页,第三天看的页数是前两天看的总页数的3/2,这时有全书的1/4没有看,这本故事书一共有多少页?写出算式 一本故事书,第一天看了总页数的3分之一,第2天看了总页数的4分只一,这本故事书共有多少页? 王大伯收了2/1吨西瓜,第一天卖出总数的3/1,第二天卖出总数的10/1,还剩下总数的几分之几? 一本书有300页,小丽第一天看了全书的1/6,第二天看了全书的2/15,第三天应从第几页看起? 一本故事书240页,小华4天看了全书的3分之2,他平均每天看多少页 运来420个西瓜.第一天卖出总数的二分之一,第二天卖出总数的三分之一.还剩总数的几分之几? 小丽,计划四天看完一本书,第一天看了全书的2/9第二天看了全书的25%,第三天看了全书的1/6.第四天应看完书的几分之几?②若小丽第三天看了16页,那么第二天看了多少页? 一本168页的故事书,小华4天读了96页.照这样计算,小华读完这本书一共需要多少天?急 有一袋面粉,第一次用去全部的1/5,第二次用去余下的15%,还剩34千克面粉,共有多少千克? 小丽看一本书120页,第一天看了它的六分之一,第二天看了全书的六分之五少15页,第三天应从第几页开始看 小明看一本120页的故事书,每天看十分之一,已经看了3天,还有几分之几没有看? 一袋面粉重一千克,第一次用去了五分之一千克,第二次用去了三分之二千克,两次一共用去多少千克?还剩多少千克? 过程详细点 小丽看一本书,第一天看了全书的8分之1再加16页,第二天看了全书的6分之1少2页,第三天看完余下的88页.请问这本书有多少页?不要给我列方程做! 小明看一本120页的故事书,每天看十分之一,已经看了3天,还有几分之几没看?还有多少页没看? 一袋面粉多少克 一本故事书有320页,小丽的一天看了8分之3,第二天看了5分之1.第三天应从第几页开始看. 小东看一本故事书120页每天看十分之一已经看了3天还有几分之几没看 冬冬家买来一袋面粉,吃了五分之三,正好是9千克.原来这袋面粉重多少千克?如题,就是这样,用方程解,求过程 一本故事书有120页,小丽第一天读了全书的1/6,第二天读了余下的1/4,第三天应从第几页读起?求.大哥大姐们 小明看一本120页的故事书,每天看1/10,已经看了3天,还有几分之几没有看? 冬冬家买来买来一袋面粉,吃了15千克,正好是这袋面粉的5分之3,这袋面粉重多少千克(写等量关系式) 小丽读一本故事书,第一天读了全书的1/12还多18页,第二天读了全书的1/5少5页这时还剩下73页.这本故事书共有多少页? 一本本故事书,小飞每天看100页.他每天看这本书的几分之几?四天呢? 1、冬冬家买来一袋面粉,重25千克.吃了五分之三,吃了多少千克?2、冬冬家买来一袋面粉,吃了1、冬冬家买来一袋面粉,重25千克.吃了五分之三,吃了多少千克?2、冬冬家买来一袋面粉,吃了15千克, 小丽看一本故事书,第一天看了20%,第二天看了剩下的30%,还剩112页,全书共多少页 一本100页的故事书,小飞,每天看20页.他每天看这本书的几分之几?四天呢? 一本一百页的故事书,第一天看了书的五分之二,第二天看了书的四分之一,第三天要看多少页才能把书看完? 小丽读一本书,第一天读了全书的六分之一,第二天读了全书的四分之一,第三天她正好应从第151页读起,这本书有多少页? 一本故事书,小飞要10天看完,前4天每天看书20页,后6天每天看25页,这本书有多少页
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn