从PictureBox保存图像（VB.Net）

Question

我有这个简单的Windows窗体应用程序，使用户能够查看图像并将其保存到自己的设备。这是我目前用于从PictureBox保存图像的编码。

Private Sub SaveFileDialog1_FileOk(sender As Object, e As CancelEventArgs) Handles SaveFileDialog1.FileOk
    Dim SaveFileAs As New SaveFileDialog
    SaveFileAs.Title = "Save File As"
    SaveFileAs.FileName = "*.jpg"
    SaveFileAs.Filter = "Jpeg |*.jpg"
    If SaveFileAs.ShowDialog() = Windows.Forms.DialogResult.OK Then
        PictureBox1.Image.Save(SaveFileAs.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
    End If
End Sub

问题是，在保存图像之前，它会打开两次对话框。我也试过这个编码：

Dim SaveFileAs As String = Path.Combine(My.Computer.FileSystem.SpecialDirectories.Temp, SaveFileDialog1.FileName)
PictureBox1.Image.Save(SaveFileAs, System.Drawing.Imaging.ImageFormat.Jpeg)

此编码打开对话框一次可以直接保存图像，但问题是，从保存文件夹中查看时不显示图像。

有没有更好的方法来保存图片？谢谢。