读书人

请教怎么将图片放到数组里面

发布时间: 2012-01-12 22:11:58 作者: rapoo

请问如何将图片放到数组里面
放到数组里面,而且我还要读取出来再显示的,请问有事例代码么?
谢谢

[解决办法]
很简单,提供思路:
定义ADO的流对象数组存储图片文件
[解决办法]

VB code
        Dim PBag As New PropertyBag        Dim Pic() As Byte        PBag.WriteProperty "PIC", picEmp.Picture        Pic = PBag.Contents        Set PBag = Nothing
[解决办法]
VB code
Private Sub Form_Load()Dim Pic(3) As StdPictureSet Pic(0) = LoadPicture(App.Path & "\1.jpg")Set Pic(1) = LoadPicture(App.Path & "\2.jpg")Set Pic(2) = LoadPicture(App.Path & "\3.jpg")Set Pic(3) = LoadPicture(App.Path & "\4.jpg")Picture1.Picture = Pic(0)End Sub
[解决办法]
我也是想到的 3F 的方法。


楼主对问题的描述不确切啊,上面有从不同的角度来 考虑/解决 问题的方法。

读书人网 >VB

热点推荐