图像 vb.net 文件被另一个进程使用错误

Question

我正在编写一个小程序，通过打开的文件对话框选择图片。当我选择一张图片时，我希望它覆盖当前图片并显示新图像。现在，我选择具有不同扩展名的图像没有任何问题。因此，当我当前有 .png 时，我可以选择 .jpg 但当我选择与当前图像具有相同扩展名的图像时，我会收到错误： 该进程无法访问文件“C:\Users....\woontypeimages\chalet_foto.jpg”，因为它正在被另一个进程使用。

    If ofd.ShowDialog() = Windows.Forms.DialogResult.OK Then
        Dim sFilename As String = cboWoningtypesWoningtype.SelectedItem.ToString & "_foto" & System.IO.Path.GetExtension(ofd.FileName)
        System.IO.File.Copy(ofd.FileName, Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Camping Relaxx\woontypeimages\" & sFilename, True)
        txtWoningtypesFoto.Text = sFilename
        updateImages()
    End If

    Private Sub updateImages()

    Try
        picFoto.Image = Nothing
        txtWoningtypesFoto.BackColor = clrReadonly
        txtWoningtypesFoto.ForeColor = Color.Black
        picFoto.Image = System.Drawing.Image.FromFile(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Camping Relaxx\woontypeimages\" & txtWoningtypesFoto.Text)
    Catch ex As Exception
        txtWoningtypesFoto.BackColor = clrError
        txtWoningtypesFoto.ForeColor = Color.White
    End Try
    Try
        picGrondplan.Image = Nothing
        txtWoningtypesGrondplan.BackColor = clrReadonly
        txtWoningtypesGrondplan.ForeColor = Color.Black
        picGrondplan.Image = System.Drawing.Image.FromFile(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Camping Relaxx\woontypeimages\" & txtWoningtypesGrondplan.Text)
    Catch ex As Exception
        txtWoningtypesGrondplan.BackColor = clrError
        txtWoningtypesGrondplan.ForeColor = Color.White
    End Try

End Sub

如果有人可以帮助我，我会很高兴

提前致谢

Answer 1

您不必担心 Dispose()，您可以使用 PictureBox 的Load(string) 方法不会锁定文件。

Me.PictureBox1.Load("C:\test.png")

Answer 2

使用这些 :

picFoto.Image.Dispose()
picGrondplan.Image.Dispose()

而不是 :

picFoto.Image = Nothing
picGrondplan.Image = Nothing

Image.FromFile 方法会保持对源文件的锁定，直到图像被释放为止。将对象设置为空并不会立即处理它 - 垃圾收集器将在自己的时间内处理该问题（很可能直到您关闭带有打开图片框的表单为止）。需要立即释放文件句柄进行处置。