vb把突破保存到指定的文件夹,
我的打开图片的代码:
CmDialog1.Filter = "*|*.jpg" '文件只能是.jpg格式
CmDialog1.ShowOpen
Pic1.Picture = LoadPicture(CmDialog1.FileName) '只接收图片
StatusBar1.Panels(1).Text = CmDialog1.FileName
保存的代码:
CmDialog1.DialogTitle = "另存为"
CmDialog1.Filter = "*.jpg|*.jpg"
CmDialog1.ShowSave
SavePicture Pic1.Picture, CmDialog1.FileName
这样是可以保存的,但是现在我要在我点保存了以后,他就自动保存了,比如,我要保存在".\image\"文件夹下面.点保存后,就自动保存到里面了,请高手指教!不胜感谢!
[解决办法]
既然要直接保存，那就只保留SavePicture Pic1.Picture, CmDialog1.FileName就行了。上面3行就不要了。提醒：即使是直接保存，也需要设定图片的文件名。
[解决办法]
SavePicture Pic1.Picture, StatusBar1.Panels(1).Text
