Feedback

VB - Bildgröße verändern (Manuell)

Veröffentlicht von am 02.07.2006
(2 Bewertungen)
Diese Funktion ändert die größe eines Bilds und gibt es als Bitmap zurück. Hier kann man als Größe die Dimensionen angeben: X und Y als Point Objekt
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
Abgelegt unter Bild, Größe, Bitmap.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!