VB6.0可使用SavePicture 语句来保存PictureBox 控件中的内容为图片:
1)SavePicture 语句,从对象或控件(如果有一个与其相关)的 Picture 或 Image 属性中将图形保存到文件中。
说明:无论在设计时还是运行时图形从文件加载到对象的 Picture属性,而且它是位图、图标、元文件或增强元文件,则图形将以原始文件同样的格式保存。如果它是 GIF 或 JPEG 文件,则将保存为位图文件。
2)AutoRedraw 属性,返回或设置从图形方法到持久图形的输出。该属性为True,可使 Form 对象或 PictureBox 控件的自动重绘有效。图形和文本输出到屏幕,并存储在内存的图象中。该对象不接受绘制事件,必要时,用存储在内存中的图象进行重绘。
以下代码保存PictureBox 控件装载的图片为bmp文件:
Private Sub Command1_Click()
SavePicture Picture1.Image, App.Path & "\TEST" ' 将图片保存到文件。
End Sub
savepicture picture1.imag,“要保存图片的文件名及路径.jpg”
你先把Picture的AutoRedraw属性改为True,然后再用PaintPicture处理,然后再用SavePicture(例如:SavePicture Picture1.Image,"C:\aa.bmp")来保存图片。
用savepicture 把picturebox的aotusize属性设置为TURE