VB image控件图片放大后保存！

答案:3 悬赏:0 手机版

解决时间 2021-03-27 09:56

提问者网友：沉默菋噵
2021-03-26 11:54

VB image控件图片放大后保存！

最佳答案

五星知识达人网友：刀戟声无边
2021-03-26 12:28

一、要实现上述效果，必须先把图片按放大或缩小后的大小绘到一个Picturebox控件上（保留原有mage1，再增加1个Picturebox控件），然后保存即可。
With Picture1
.Width = Image1.Width
.Height = Image1.Height
.PaintPicture Image1.Picture, 0, 0, Image1.Width, Image1.Height
SavePicture Picture1.Image, "c:\test.bmp"
End With
二、至于保存图片大小的问题，你可以把它保存为JPG等格式，具体代码到Baidu搜索，很容易得到的。

全部回答

1楼网友：深街酒徒
2021-03-26 14:21

准备一个PictureBox，然后用BitBlt想多大就多大。
最后，SavePicture

2楼网友：低音帝王
2021-03-26 13:37

1楼正解，不过别忘了把picture1的AutoRedraw属性设为true，否则得不到图片。
另外，如果想得到更好的图像效果、处理速度更快，还是用gdiplus更好

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息