vb如何写程序将picturebox的图片缩小一般半
1个回答
推荐于2016-07-18
展开全部
Private Sub Form_Load()
Me.AutoRedraw = True
Picture1.AutoRedraw = True
End Sub
Private Sub Picture1_Click()
Me.PaintPicture Picture1.Picture, 0, 0, Picture1.Picture.Width / 3.5, Picture1.Picture.Height / 3.5
Picture1.Picture = LoadPicture("")
Picture1.Picture = Me.Image
Me.Picture = LoadPicture("")
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询