Visual Basic - Ubicar una imagen en un formulario

Private Sub Form_Resize()

Dim pic As StdPicture

 Set pic = LoadPicture("C:\Imagen.jpg")

Me.Cls

' Zona en la que pintaremos

X1 = Me.ScaleWidth - 2400

Y1 = Me.ScaleHeight - 2400

X2 = 4200

Y2 = 4200

'Zona que pintaremos

X3 = 0

Y3 = 0

X4 = pic.Width

Y4 = pic.Height

Form1.PaintPicture pic, X1, Y1, X2, Y2, X3, Y3, X4, Y4

End Sub