Vb.Net: Mengganti Ukuran Gambar (Resize Image)

*.jpg;*.jpeg;*.png;*.bmp"
      End With
      Dim result As DialogResult = OpenFileDialog1.ShowDialog()
      If result = Windows.Forms.DialogResult.OK Then
          Try
              TextBox1.Text = OpenFileDialog1.FileName
              PictureBox1.ImageLocation = OpenFileDialog1.FileName
          Catch ex As Exception
              MsgBox("Error : " & ex.Message)
          End Try
      End If
  End Sub

  Private Sub Button2_Click(ByVal sender As System.Object, _
              ByVal e As System.EventArgs) Handles Button2.Click

      SaveFileDialog1.Filter = "Image Files