Dim handleImg As New IntPtr(CType(valeur, Integer)) aBmp.Save("d:\bidule.bmp", System.Drawing.Imaging.ImageFormat.Bmp)
Dim anImg As System.Drawing.Image Dim aBmp As System.Drawing.Bitmap Dim handleImg As IntPtr handleImg = CType(valeur, IntPtr) aBmp = anImg.FromHbitmap(handleImg) aBmp.Save("d:\bidule.bmp")