关于加载资源文件中的图片，请高手帮助！！

Question

代码是AddTrayIcon Me, App.path & "\QQTray.ico"
    SetTrayTip "QQ"
    LoadImage App.path & "\StateList_1.png", DP_Icons(0)
    LoadImage App.path & "\StateList_2.png", DP_Icons(1)
    LoadImage App.path & "\StateList_3.png", DP_Icons(2)
    LoadImage App.path & "\StateList_4.png", DP_Icons(3)
    LoadImage App.path & "\StateList_5.png", DP_Icons(4)
    LoadImage App.path & "\StateList_6.png", DP_Icons(5)
    LoadImage App.path & "\DownIcon.png", DP_Icons(6)
我想把这段代码改成, LoadResPicture(101, vbResBitmap)，上面的代码怎么改，就是加载资源文件中的这些图片，和最上面的一个ico。请高手回答，谢谢了！

Answer 1

首先你要打开资源管理器，向其中添加BMP文件，每个BMP在其中都有一个编号，比如你所写的：101
其次就是读取了，Picture1.picture=LoadResPicture(101,vbresbitmap)

Answer 2

全是png格式图片，VB不支持。即使用gdi+处理也不顺当。

Answer 3

使用FindResource等API方式取得资源文件，并且需要返回的类型是Byte()
然后可以使用GDI+的API绘制PNG图形，不过注意可能有问题