(Je sais pas si ça marche)
Mets un contrôle Image et règle SCALEMODE sur Pixels. Quand tu as ouvert l'image dans le contrôle Image inscris le code suivant :
Dim iX,iY
iX=Image1.ScaleWidth
iY=Image1.ScaleHeight
Un contrôle image est redimensionné automatiquement quand on charge une image, non ?