Как вырезать фрагмент из изображения - VB
Формулировка задачи:
Помогите.
Как в vb вырезать фрагмент из изображения и сохранить его в отдельный файл
Решение задачи: «Как вырезать фрагмент из изображения»
textual
Листинг программы
Private Sub Command1_Click() Dim h As Long, w As Long picTemp.Visible = False Set Picture1.Picture = LoadPicture('имя файла') w = Picture1.Width 2 h = Picture1.Height 2 picTemp.Width = w picTemp.Height = h picTemp.PaintPicture Picture1.Picture, 0, 0, w, h, 0, 0, w, h SavePicture picTemp.Picture, 'имя файла' End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д