Ошибка сохранения PictureBox - Visual Basic .NET

Формулировка задачи:

Пытаюсь сохранить изображение с PictureBox следующим образом

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        SaveFileDialog1.Filter = "JPG|*.jpg|GIF|*.gif"
        If SaveFileDialog1.ShowDialog = DialogResult.Cancel Then Exit Sub
        PictureBox1.Image.Save(SaveFileDialog1.FileName)
End Sub

Но при сохранении вываливается такая ошибка Что не так я делаю? И тут же сразу второй связанный вопрос. Как сохраняемую картинку перед сохранением как бы увеличить в 2 раза и затем сохранить? Мне не хочется увеличивать PictureBox на форме для увеличения, может есть способ программно увеличить перед сохранением?

Решение задачи: «Ошибка сохранения PictureBox»

textual
                            Листинг программы 
                        
                            Dim BM As New Bitmap(PictureBox1.Width, PictureBox1.Height, Drawing.Imaging.PixelFormat.Format24bppRgb)