Question

VB 调用res自定义图片

vb里做了个资源文件，图片是自定义的，请问在picture控件里调用图片怎么做？谢谢

Answer 1

LoadResPicture函数
用以从资源(.res)文件装载位图、图标或光标。

语法
LoadResPicture(index, format)

LoadResPicture函数的语法包含下列部分：
index 必需的。一个整数或字符串，它用来指定资源文件中数据的标识符(序号)。标识符为1的资源保留给应用程序的图标。
format 必需的。一个数值或常数，如下列"设置值"中所描述，返回数据的格式。
用于format的设置值有：
常数 值 描述
vbResBitmap 0 位图资源
vbResIcon 1 图标资源
vbResCursor 2 光标资源

说明:
可以使用LoadResPicture函数代替对存储在Form或控件的Picture属性中的图形的引用。
将位图、图标或光标存储在资源文件中并从该资源文件对它们进行访问能改进装载时间，这是因为可以根据需要从资源文件单独装载，而不是在装载Form时一并全部装载。

Answer 2

Set Picture1.Picture =LoadResPicture(101,0)'这是加载一个位图*.bmp
Set Form1.Icon=LoadResPicture(101,1)'这是加载一个*.ico
Set Picture1.Icon=LoadResPicture(101.2)'这是加载一个*.cur
Dim MapByte() as byte
mapbyte=LoadResData(101,"CUSTOM")这个方法返回Byte数组，根据文件的类型可用不同的方法读取，建义用上面三个，这个方法最麻烦
101为加载第一个Res文件，其中BMP,Ico,Cur分类被存放，所以可以是同一个ID
比如
101 是1.Bmp 101是1.cur 101是1.ico
102 是2.bmp 102是2.cur 102 是2.ico

Answer 3

Picture1.Picture = LoadPicture("D:\我的文档\My Pictures\1.bmp")