Bildgröße verändern (Manuell)

1
2
3
4
5

Public Function PicResizeByDimension(ByVal SourceImage As String, ByVal Dimension As Point) As Bitmap
    Dim OutputBitmap As New Bitmap(System.Drawing.Image.FromFile(SourceImage), Dimension)
    PicResizeByPercent = OutputBitmap
    OutputBitmap.Dispose()
End Function