Изменение размеров изображений в VB.NET

Question

Изменение размеров изображений в VB.NET

Я хотел бы сделать простую утилиту VB для изменения размеров изображений с помощью vb.net. Я испытываю затруднения при выяснении что vb класс использовать для фактического управления изображениями. Класс Изображения и Растровый класс не работают.

Любые идеи, подсказки, подсказки, учебные ссылки значительно ценятся.

Спасибо.

12

vb.net image resize image-manipulation

задан Moshe 27 January 2010 в 04:34

2 ответа

Не знаю много синтаксиса VB.NET, но вот и идея

Dim source As New Bitmap("C:\image.png") 
Dim target As New Bitmap(size.Width, size.Height, PixelFormat.Format24bppRgb)

Using graphics As Graphics = Graphics.FromImage(target)
    graphics.DrawImage(source, new Size(48, 48)) 
End Using

2

ответ дан 2 December 2019 в 03:43

Другие вопросы по тегам:

vb.net image resize image-manipulation

Похожие вопросы:

score 14 · Accepted Answer

Вот статья с подробностями о том, как это сделать.

Private Sub btnScale_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles btnScale.Click
    ' Get the scale factor.
    Dim scale_factor As Single = Single.Parse(txtScale.Text)

    ' Get the source bitmap.
    Dim bm_source As New Bitmap(picSource.Image)

    ' Make a bitmap for the result.
    Dim bm_dest As New Bitmap( _
        CInt(bm_source.Width * scale_factor), _
        CInt(bm_source.Height * scale_factor))

    ' Make a Graphics object for the result Bitmap.
    Dim gr_dest As Graphics = Graphics.FromImage(bm_dest)

    ' Copy the source image into the destination bitmap.
    gr_dest.DrawImage(bm_source, 0, 0, _
        bm_dest.Width + 1, _
        bm_dest.Height + 1)

    ' Display the result.
    picDest.Image = bm_dest
End Sub

[Редактировать]
Еще один на похожих строках.