OpenFileDialogでPictureBoxにロードした画像を
SaveFileDialogで保存しようとしても空っぽのjpgファイルが出来るだけで画像の保存が出来ません。

Dim sfd As New SaveFileDialog()
sfd.FileName = OpenFileDialog1.FileName
sfd.FilterIndex = 2

If sfd.ShowDialog() = DialogResult.OK Then
Dim stream As System.IO.Stream
stream = sfd.OpenFile()
If Not (stream Is Nothing) Then
Dim sw As New System.IO.StreamWriter(stream)
sw.Write(PictureBox1.Image)
End If
End If
何か根本的に間違っているのでしょうか、、、、