Visual Basic

Case 1
    form2.PictureBox1.Image.Save(fs, _
       System.Drawing.Imaging.ImageFormat.Jpeg)

Dim saveFileDialog1 As New SaveFileDialog()
     saveFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif"
     saveFileDialog1.Title = "Save an Image File"
     saveFileDialog1.ShowDialog()
 
     ' If the file name is not an empty string open it for saving.
     If saveFileDialog1.FileName <> "" Then
         ' Saves the Image via a FileStream created by the OpenFile method.
         Dim fs As System.IO.FileStream = CType _
            (saveFileDialog1.OpenFile(), System.IO.FileStream)
         ' Saves the Image in the appropriate ImageFormat based upon the
         ' file type selected in the dialog box.
         ' NOTE that the FilterIndex property is one-based.
         Select Case saveFileDialog1.FilterIndex
             Case 1
                 form2.PictureBox1.Image.Save(fs, _
                    System.Drawing.Imaging.ImageFormat.Jpeg)
 
             Case 2
                 Me.Button2.Image.Save(fs, _
                    System.Drawing.Imaging.ImageFormat.Bmp)
 
             Case 3
                 Me.Button2.Image.Save(fs, _
                    System.Drawing.Imaging.ImageFormat.Gif)
         End Select
 
         fs.Close()
     End If