JLRodgers should know this one... hopefully.

In my program I need to load an image into a picturebox and resize it to a specific size. How is this done? I already can load the image into the picturebox... that's easy.

But I need to know once it's there, how to resize it to be 305x210 pixels.

To do this, I use the "Open" dialog box, and then whatever file the user selects is loaded into the picturebox. This works fine.

I need to know how to get to always resize the loaded image to 305x210 pixels.

Help!
Thanks!

If you can use an image control instead, it has a stretch feature...

Otherwise, try the following (of course, picture1 will have to have a picture loaded):

Option Explicit

Private Declare Function StretchBlt Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long

Private Sub Form_Load()
    Me.Visible = True
    DoEvents
' Set the graphic mode to persistent
    Me.AutoRedraw = True
' API uses pixels, set pixels for the form, and boxes
' that way can just set width  & height to desired pixel
    Me.ScaleMode = vbPixels
    Picture1.ScaleMode = vbPixels
    Picture2.ScaleMode = vbPixels
    
' Set the width and height
    Picture2.Width = 210
    Picture2.Height = 305
    DoEvents
' Stretch the picture
    StretchBlt Picture2.hdc, 0, 0, 210, 305, Picture1.hdc, 0&, 0&, Picture1.Width, Picture1.Height, vbSrcCopy
End Sub

Thanks JL, works now.