想编一个处理图片的小软件
但是在处理过图片像素后
用PSet打点到picturebox控件上后
其picture属性没有随之改变
有没有什么办法使picture属性也随之改变？
先谢谢啦！
反向的代码如下：

Private Sub FanXiang1()
Dim X1 As Long, Y1 As Long
Dim c As Long
    On Error GoTo fanxiang1_1 '错误跳转
    For Y1 = 0 To picture1.ScaleHeight
        For X1 = 0 To picture1.ScaleWidth
            c = 16777216 - picture1.Point(X, Y)
            picture2.PSet (X1, Y1), c '绘制像素点
        Next X1
    Next Y1
    image1.picture = picture2.picture
fanxiang1_1:End Sub

其中picture1和picture2是picturebox控件
image1是Image控件

现在image1没有显示图片
应该就是picture2的picture没有被改变

最好再解决一下速度问题。

跪求方法！！！

image控件似乎没有image属性