如何让Visual Basic释放PictureBox控件占用的图片资源

核心原因 #

你仅将PicBoxLeft.Image设置为Nothing只是断开了控件与图片对象的引用，GDI+加载图片时持有的文件锁定句柄并没有被释放，图片对象本身还存活在内存中，因此系统会判定文件仍被占用，无法执行移动操作。

修正后的代码 #

Dim fileLeft As String
Dim fileCopy As String
' 先取出控件当前绑定的图片对象
Dim oldImage As Image = Me.PicBoxLeft.Image
' 解除控件与图片的绑定关系
Me.PicBoxLeft.Image = Nothing
' 显式释放图片对象占用的所有资源，包括文件锁
If oldImage IsNot Nothing Then
    oldImage.Dispose()
End If
' 强制立即执行垃圾回收，确保所有待释放资源处理完毕（高频率操作场景建议保留）
GC.Collect()
GC.WaitForPendingFinalizers()

' 路径拼接建议改用Path.Combine，避免分隔符异常
fileLeft = System.IO.Path.Combine(TNpath, fileNames(q))
fileCopy = System.IO.Path.Combine("C:\AuditBook\Temp", fileNames(q))
My.Computer.FileSystem.MoveFile(fileLeft, fileCopy, True)

长期优化方案（从根源避免文件锁） #

如果你的业务需要频繁操作图片源文件，建议首次加载图片时就使用内存副本绑定到控件，不需要占用源文件句柄：

' 加载时创建内存副本，源文件不会被锁定
Using originalImg As Image = Image.FromFile(源图片路径)
    Me.PicBoxLeft.Image = New Bitmap(originalImg)
End Using

采用该方案加载的图片，后续操作源文件时不需要专门释放控件资源也不会出现占用报错。

内容的提问来源于stack exchange，提问作者JerrMerr