Загрузить изображение с помощью OpenFileDialog и переместить/вырезать изображение из исходного местоположения в другое место

Question

Пожалуйста, помогите. Как перенести изображение в другое место с помощью vb.net?

Я пробовал эту стратегию, но ее не работало.

Private Sub PictureBox2_Click(sender As Object, e As EventArgs) Handles PictureBox2.Click 
    If dlg.ShowDialog() = Windows.Forms.DialogResult.OK Then 
     fullPath = dlg.FileName 'c:\Sample\image1.jpg 
     ImageFileName = Path.GetFileName(dlg.FileName) 'image1.jpg filename holder 
     PathHolder = Path.Combine("d:\FinalLocation", ImageFileName) 
     With PictureBox2 
      .Image = Image.FromFile(fullPath) 
      .SizeMode = PictureBoxSizeMode.Zoom 
     End With 
    End If 
End Sub 

THEN Когда пользователь нажимает кнопку Сохранить У меня есть код, как это

Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click 
    File.Move(fullPath, PathHolder) 'the 1st try 
    'System.IO.File.Move(fullPath, PathHolder) '2nd try but its not working at all 
End Sub 

Заранее спасибо :)

Answer 1

Это так легко. Ваш код верен, но в кнопке сохранения отсутствует 1 строка.

Попробуйте добавить следующее:

Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click 
picturebox2.image.dispose() 
File.Move(fullPath, PathHolder) 
End Sub 

Я думаю, что вы не можете переместить изображение в другое место, потому что до сих пор используется по PictureBox.

Просто дайте ему попробовать :)