急,谢谢
解决方案 »
- 请问VB如何接收WM_COPYDATA消息?
- DataGridview空字符串问题。怎么实现如果点的是空字符串的cell,会跳出一个msgbox 警告你。谢谢了!
- 字符串转化为VB可计算的公式
- 請問VB中怎樣捕獲Excel返回的錯誤.比如輸入公式sum("R4,R5")入一個單元格,但是出錯了,VB怎么捕獲.
- 请问控件随窗口缩放的同时,控件中的字文大小如何随之缩放呢?
- 关于datagrid的问题,各位帮解决一下
- 最近要考外语口试,而口试练习软件却……实在令人气愤!
- 在程序中,如何向execl写入数据?
- VB那个控件能用来模仿QQ用户界面
- 紧急!!!快来看看这一段代码!关于数据库更新的!为什么.........????
- 用“RecordCount”得不到一个记录集的行数怎么办?
- 在学校一直用access,听说找工作许多需要sql server,所以想知道怎么写存储过程和触发器,怎样在程序中调用,请各位大哥帮忙。
LoadResPicture 函数
用以从资源 (.res) 文件装载位图、图标或光标。语法LoadResPicture(index, format)LoadResPicture 函数的语法包含下列部分:部分 描述
index 必需的。一个整数或字符串,它用来指定资源文件中数据的标识符 (ID) 。ID标识符为 1 的资源保留给应用程序的图标。
format 必需的。一个数值或常数,如下列“设置值”中所描述的,指定返回数据的格式。
设置值用于 format 的设置值有: 常数 值 描述
vbResBitmap 位图 0 位图资源
vbResIcon 图标 1 图标资源
vbResCursor 2 光标资源
说明可以使用 LoadResPicture 函数代替对存储在 Form 或控件的 Picture 属性中的图形的引用。将位图、图标或光标存储在资源文件中并从该资源文件对它们进行访问能改进装载时间,这是因为可以根据需要从资源文件单独装载,而不是在装载 Form 时一并全部装载。LoadResPicture 的使用对于 Visual Basic 应用程序的本地化有好处,这是因为需要翻译的资源在一个资源文件中被隔离,并且无须访问源代码或重新编译该应用程序。
Dim BagBytes() As Byte
' Create new property bag and load image into it
Set MyBag = New PropertyBag
Call MyBag.WriteProperty("Picture", LoadPicture(App.Path & "\nbcar.JPG"))
' Get property bag contents as byte array
BagBytes() = MyBag.Contents()
' Destroy property bag and re-create
Set MyBag = Nothing
Set MyBag = New PropertyBag
' Re-populate property bag from byte array and extract picture
MyBag.Contents = BagBytes
Set Me.Picture = MyBag.ReadProperty("Picture")
' Clean up
Set MyBag = Nothing