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搜索，很容易得到的。
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
最后，SavePicture
- 2楼网友：低音帝王
- 2021-03-26 13:37
1楼正解，不过别忘了把picture1的AutoRedraw属性设为true，否则得不到图片。
另外，如果想得到更好的图像效果、处理速度更快，还是用gdiplus更好
另外，如果想得到更好的图像效果、处理速度更快，还是用gdiplus更好
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯