VB2008里面怎样保存PictureBox中的图片

我在VB2008中的PixctureBox里面用DrawLine的方法画了曲线图形,请问怎样保存画好的PictureBox中的图片?我用下面的代码出现了 “未将对象引用设置到对象的实例”的错误,请问怎样改正?
代码如下:
Private Sub But_SavePicture_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles But_SavePicture.Click

Try
PictureBox1.Image.Save("d:\1.bmp", System.Drawing.Imaging.ImageFormat.Jpeg)
Catch ex As Exception
MsgBox(ex.Message)
End Try

End Sub

代码好像没什么错误,应该是因为PictureBox1没有前景图片,即PictureBox1.Image is nothing
Try
Dim df As New SaveFileDialog()
df.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif|PNG Image|*.png"
df.FileName = String.Empty
df.ShowDialog()

If Not String.IsNullOrWhiteSpace(df.FileName) Then
Dim fs As System.IO.FileStream = DirectCast(df.OpenFile(), System.IO.FileStream)
Select Case df.FilterIndex
Case 1
PictureBox2.Image.Save(fs, System.Drawing.Imaging.ImageFormat.Jpeg)
Exit Select
Case 2
PictureBox2.Image.Save(fs, System.Drawing.Imaging.ImageFormat.Bmp)
Exit Select
Case 3
PictureBox2.Image.Save(fs, System.Drawing.Imaging.ImageFormat.Gif)
Exit Select
Case 4
PictureBox2.Image.Save(fs, System.Drawing.Imaging.ImageFormat.Png)
Exit Select
End Select
fs.Flush()
fs.Close()

Else

End If
Catch ex As Exception

End Try追问

经调试 PictureBox1.Image 的值是nothing ,那要怎样才能使PictureBox1.Image 的值不为nothing 呢,我加载一幅纯白的图片可以吗?

追答

可以的,比如说可以在设计时设置PictureBox1的Image属性,也可以在这段代码被调用前将非空的IMage对象赋给PictureBox1.Image
纯白的图片也是图片,当然可以的。

温馨提示:内容为网友见解,仅供参考
无其他回答

vb2008中如何从picturebox中保存图片
picturebox.Image.Save("c:\\1.jpg",System.Drawing.Imaging.ImageFormat.Jpeg)

在VB中怎样将PictureBox内显示的内容(包括里边的控件)保存为图片文件...
在VB中将PictureBox内显示内容(包含里面加载的控件)保存为图片文件需要使用多个API函数来实现。被保存的图片是bmp格式的。 实现代码: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48...

在VB中怎样将PictureBox内显示的内容(包括里边的控件)保存为图片文件...
picturebox控件,可以实现截屏保存。手动绘制的图案的属性是image,这个属性受自动重绘设置控制,当设为假时,WINDOWS 仅临时输出,并不保存到内存里,截图,覆盖都会导致 图像消失。当设为真时,WINDOWS会建议对应的缓冲区,图像会保存在内存里,能被截图,覆盖时,会自动调用内存的内存进行重新绘图 ...

VB 中怎样把在picturebox中画完的图怎样保存起来 也就是输出图片
像这样可以保存图:SavePicture Picture1.Image, "图片1.bmp"

VB中两个Picturebox中的图片保存成一张图片
把一图片框的图像通过paintPicture方法复制到另一个图片框中,或把它们复制到第三个隐藏的图片框中,在用savePicture 保存,参数是Image属性,不这要autoDraw=true时Image才有效。

用VB程序在PictureBox控件上画了一个图形,想把它以文件的形式保存起来...
怎么写 你自己看 ,只给说一下过程 对象 Picture1, 设置 autoRedraw=True 保存图片: SavePicture Picture1.image,文件路径 有 了路径 向 ComboBox 添加 装入图片PictureBox.Picture= LoadPicture("图片路径")

VB中如何转存剪贴板中的图片
'创建一个picturebox,其 autosize设为true '创建一个按钮 '运行以下代码 Option Explicit Private Sub Command1_Click()Picture1.Picture = Clipboard.GetData SavePicture Picture1.Picture, "d:\\1.jpg" '保存路径和文件名自己定 End Sub

vb如何将PictureBox内的图片保存到数据库里
提取PictureBox内的图片转化为二进制,保存到sql数据库内,最好有具体程序代码... 提取PictureBox内的图片转化为二进制,保存到sql数据库内,最好有具体程序代码 展开  我来答 3个回答 #热议# 意大利和韩国运动员对立的原因是什么?匿名用户 2012-07-25 展开全部 常见的笔记本故障大全 笔记本电脑由于其结构的...

vb如何保存PictureBox里面的所有东西?
Private Sub Command1_Click() Picture1.AutoRedraw = True Picture1.Print "Hello" Picture1.Print "Hello,My Name is xkwy." Picture1.Print "I am xkwy!" SavePicture Me.Picture1.Image, "C:\\xkwy.jpg"End Sub ★MSDN关于SavePicture 语句的解释:...

怎么在VB中将picturebox控件中的内容保存为图片?
VB6.0可使用SavePicture 语句来保存PictureBox 控件中的内容为图片:1)SavePicture 语句,从对象或控件(如果有一个与其相关)的 Picture 或 Image 属性中将图形保存到文件中。说明:无论在设计时还是运行时图形从文件加载到对象的 Picture属性,而且它是位图、图标、元文件或增强元文件,则图形将以原始...

相似回答
大家正在搜