vb6.0 如何用command将picturebox里的储存成图片
展开全部
添加两个picture,以及两个command,一个作为预览,一个用于保存。
然后是:priavte sub command1_click()'将picture1加载的图片作为预览到picture2
Picture2.ScaleMode = 3
Picture2.AutoRedraw = True
Picture2.PaintPicture Picture1.Image, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight
end sub
'Picture2.Image 即你需要的内容:
然后 private sub command2_click()'将picture2图片保存到c:test.bmp
SavePicture Picture2.Image, "C:\test.bmp"
end sub
然后是:priavte sub command1_click()'将picture1加载的图片作为预览到picture2
Picture2.ScaleMode = 3
Picture2.AutoRedraw = True
Picture2.PaintPicture Picture1.Image, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight
end sub
'Picture2.Image 即你需要的内容:
然后 private sub command2_click()'将picture2图片保存到c:test.bmp
SavePicture Picture2.Image, "C:\test.bmp"
end sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询