vb如何写程序将picturebox的图片缩小一般半

 我来答
匿名用户
推荐于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
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式