From: Mike Williams on
On 28 Jan, 22:43, "Guy" <some...(a)somewhere.nb.ca> wrote:

> ' In this example, just one form; three
> command buttons; and three PictureBox
> controls - all have AutoRedraw=True

When you paint a picture into an Autoredraw Picture Box the resultant
"drawn picture" becomes the Image propertry of the pciture box (not
its Picture property). That is one reasonm why your code is not
working. Also, when you draw a picture you usual;ly need to specify
the size of the desired output as well as its position. Try the
following to see what I mean. Post again if there is anything you do
not understand:

Mike

Private Sub Command1_Click()
Picture1.Picture = LoadPicture("c:\temp\tulips.jpg")
End Sub

Private Sub Command2_Click()
Picture2.PaintPicture Picture1.Picture, 0, 0, _
Picture2.ScaleWidth, Picture2.ScaleHeight
End Sub

Private Sub Command3_Click()
Picture3.PaintPicture Picture2.Image, 0, 0, _
Picture3.ScaleWidth, Picture3.ScaleHeight
End Sub


From: Guy on
> When you paint a picture into an Autoredraw Picture Box the resultant
> "drawn picture" becomes the Image propertry of the pciture box (not
> its Picture property). That is one reasonm why your code is not
> working. Also, when you draw a picture you usual;ly need to specify
> the size of the desired output as well as its position. Try the
> following to see what I mean. Post again if there is anything you do
> not understand:
>
> Mike
>
> Private Sub Command1_Click()
> Picture1.Picture = LoadPicture("c:\temp\tulips.jpg")
> End Sub
>
> Private Sub Command2_Click()
> Picture2.PaintPicture Picture1.Picture, 0, 0, _
> Picture2.ScaleWidth, Picture2.ScaleHeight
> End Sub
>
> Private Sub Command3_Click()
> Picture3.PaintPicture Picture2.Image, 0, 0, _
> Picture3.ScaleWidth, Picture3.ScaleHeight
> End Sub
>


Like David indicated, I used the image property and it appears to
work.Thanks again to all : )
Guy