VB中savefiledialog如何实现图片另存为?
请看我写的代码,另存为框打开后可以在文件名中显示文件名,但点击保存后另存为框可以正常关闭,但就是无法生成图片。PrivateSubButton2_Click(ByVals...
请看我写的代码,另存为框打开后可以在文件名中显示文件名, 但点击保存后另存为框可以正常关闭,但就是无法生成图片。
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim saveFileDialog1 As New SaveFileDialog()
saveFileDialog1.Filter = "图像文件 (jpeg,jpg,png,bmp)|*.jpeg;*.jpg;*.png;*.bmp|All files (*.*)|*.*"
saveFileDialog1.FilterIndex = 2
saveFileDialog1.RestoreDirectory = True
saveFileDialog1.InitialDirectory = False
saveFileDialog1.FileName = OpenFileDialog1.FileName
saveFileDialog1.ShowDialog()
End Sub
自行编写代码生成文件写入到saveFileDialog1.FileName 这个目标位置上
我现在想要实现的功能是:打开一张图片,在页面的picturebox1中显示,然后点击另存为按扭,把打开的这个图片保存到所选的位置,现在就是不知道如何把图片保存到所选的位置上,请大侠指教,谢谢。 展开
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim saveFileDialog1 As New SaveFileDialog()
saveFileDialog1.Filter = "图像文件 (jpeg,jpg,png,bmp)|*.jpeg;*.jpg;*.png;*.bmp|All files (*.*)|*.*"
saveFileDialog1.FilterIndex = 2
saveFileDialog1.RestoreDirectory = True
saveFileDialog1.InitialDirectory = False
saveFileDialog1.FileName = OpenFileDialog1.FileName
saveFileDialog1.ShowDialog()
End Sub
自行编写代码生成文件写入到saveFileDialog1.FileName 这个目标位置上
我现在想要实现的功能是:打开一张图片,在页面的picturebox1中显示,然后点击另存为按扭,把打开的这个图片保存到所选的位置,现在就是不知道如何把图片保存到所选的位置上,请大侠指教,谢谢。 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询