none
VB.NET2008里面怎样保存PictureBox中的图片? RRS feed

  • 问题

  • 请问,我在pictureBox1中画了一些图形, 想要保存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

    • 已移动 Min ZhuModerator 2011年10月4日 1:09 (发件人:.NET Framework 一般性问题讨论区)
    2011年10月3日 10:35

答案

  • 看起来您没有直接画在PictureBox1的Image上

    请试试看

        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    
            Dim bmp = New Bitmap(PictureBox1.Width, PictureBox1.Height) '产生图像
    
            Dim g = Graphics.FromImage(bmp) '产生画布
            g.Clear(Color.White) '画布背景色
            g.DrawString("Hello World!!", New Font("Arial", 14), Brushes.DarkRed, 0, 0) '画布写上字符串
            PictureBox1.Image = bmp 'PictureBox1.Image指定該图像
    
    
            '保存PictureBox1的图像
            Dim fs = New System.IO.FileStream("C:\Hello.jpg", IO.FileMode.Create)
            PictureBox1.Image.Save(fs, Imaging.ImageFormat.Jpeg)
            fs.Close()
    
        End Sub
    

     

     

     


    Shadowと愉快なコード達
    2011年10月4日 2:00