如何在vb.net中裁剪图像？

Question

图像可以是任何东西.它可以是jpg,png,任何东西.

加载它.

裁剪它.假设从左侧删除前100个像素.

保存到同一个文件

Answer 1

使用Graphics.DrawImage方法(Image,RectangleF,RectangleF,GraphicsUnit)方法.

    Dim fileName = "C:\file.jpg"
    Dim CropRect As New Rectangle(100, 0, 100, 100)
    Dim OriginalImage = Image.FromFile(fileName)
    Dim CropImage = New Bitmap(CropRect.Width, CropRect.Height)
    Using grp = Graphics.FromImage(CropImage)
        grp.DrawImage(OriginalImage, New Rectangle(0, 0, CropRect.Width, CropRect.Height), CropRect, GraphicsUnit.Pixel)
        OriginalImage.Dispose()
        CropImage.Save(fileName)
    End Using