On peut faire aussi comme ceci :
Mettre 2 pictureBox sur la MDIForm : PictureOriginal et PictureStrech
(mettre le PictureOriginal en visible = false)
Mettre aussi un timer : TimerResize
(mettre l'interval du timer a 10 par exemple)
Le but de ce timer va être d'attendre la fin du resize de la form car si on clique sur le bouton agrandir de la feuille sans mettre une toute petite temporisation alors ca va merder !!!
Voici le code :
Private Sub MDIForm_Resize()
TimerResize.Enabled = True
End Sub
Private Sub TimerResize_Timer()
TimerResize = False
PictureStrech.Move 0, 0, MDIForm1.Width, MDIForm1.Height - 500
PictureStrech.Picture = PictureOriginal.Picture
PictureStrech.PaintPicture PictureStrech.Picture, 0, 0, PictureStrech.ScaleWidth, PictureStrech.ScaleHeight
End Sub
Voila

@+