Dim img As Image = Me.PictureBox1.Image '// winnt.bmp
        Dim ofd As New SaveFileDialog
        If ofd.ShowDialog() = DialogResult.OK Then
            img.Save(ofd.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
        End If