Как сохранить реальный PictureBox

Question

Мне нужно сохранить картинку с реальным изображением, как показано. Помогите мне?

Ex:

Dim myEncoder As Encoder 
    Dim myImageCodecInfo As ImageCodecInfo 
    Dim myEncoderParameter As EncoderParameter 
    Dim myEncoderParameters As EncoderParameters 
    Dim bmp As Bitmap = CType(imgJpgPng.Image, Bitmap) 
    Dim bmpt As New Bitmap(640, 640) 
    Using g As Graphics = Graphics.FromImage(bmpt) 
     g.DrawImage(bmp, 0, 0, bmpt.Width, bmpt.Height) 
    End Using 
    myImageCodecInfo = GetEncoderInfo(ImageFormat.Jpeg) 
    myEncoder = Encoder.Quality 
    myEncoderParameters = New EncoderParameters(1) 
    myEncoderParameter = New EncoderParameter(myEncoder, CType(75L, Int32)) 
    myEncoderParameters.Param(0) = myEncoderParameter 
    bmpt.Save("d:\ImgTemp\0000.JPG", myImageCodecInfo, myEncoderParameters) 

Answer 1

Из того, что я получаю то, что вы хотите, чтобы сохранить изображение изображение коробки, может быть в каталог или что-то. Так что, давайте сразу перейдем к этому (это очень просто. Кстати, я заметил, что у вас есть Dimmd bmpt на 640, 640, может быть, это проблема.

Вот как я бы сэкономил изображение в поле изображения

PictureBox1.Image.Save ("C: \ Users \ Владелец \ Desktop \ Веб-камера Применение poctures \ picture.jpg")

Его очень понятны, Picturebox1.Image.Save (сохранение изображения) и в цитаты, есть каталог, а в конце есть jpg, вы можете сделать его .png или любой другой формат файла. Если вы хотите, чтобы он отображался как исходное изображение в окне изображения, вам понадобится перейти к свойствам окна изображения и ma ke it больше (размер) или используйте функцию растяжки.

Редактировать: Извините, что я не читал ваш вопрос правильно, вот обновление!

Прочтите информацию этого веб-сайта и изучите ее, это очень поможет! http://www.vb-helper.com/howto_resize_picture_save.html