.NET 中的文件 IO 操作引发 IO 异常

Question

我有一个用 VB.NET 编写的代码，它包含两个文件操作，即 File.Exists() 和 File.Delete(filepath)，其中 filepath 是要删除的文件的路径。每当我运行此代码时，它第一次执行时都没有问题，如：-

如果 File.Exists 为真，则 File.Delete，但是，当我下次尝试对另一个文件执行相同操作时，就会出现此问题。说“某个进程正在使用该文件”。在这里，我唯一做的就是使用 File.Exists 和 File.Delete 操作。没有读取文件/流或复制/创建文件或打开/关闭文件。

谁能在这个话题上启发我并给我一些建议？

另外，我已经尝试了堆栈溢出的大多数建议，但无济于事。

编辑：- （使用的代码）

Dim dir As String = "C:/ProgramData/MySQL/MySQL Server 5.7/Uploads/" 
Dim filePath As String = "C:/ProgramData/MySQL/MySQL Server 5.7/Uploads/'somefile'"
Dim fileInfo As New FileInfo(filePath)


Try

    If Directory.Exists(dir) Then

       If File.Exists(filePath) Then

          File.Delete(filePath)

       End If

Catch ex As Exception

   Debug.WriteLine("Error: " + ex.Message)

End Try

Answer 1

我无法重新创建它。

测试

Private Shared prng As New Random
Private Sub Abuse()
    For x As Integer = 1 To 50
        FileTest()
    Next
    Debug.WriteLine("done")
End Sub

Private Sub FileTest()
    Dim b(2047 * 1024) As Byte
    prng.NextBytes(b)

    'setup a test folder
    Dim path As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
    Dim testF As String = IO.Path.Combine(path, "testƒ")
    If Not IO.Directory.Exists(testF) Then
        IO.Directory.CreateDirectory(testF)
    End If

    'create some files
    Dim fn() As String = {"one", "two", "three"}
    For Each f As String In fn
        Dim p As String = IO.Path.Combine(testF, f)
        p = IO.Path.ChangeExtension(p, "txt")
        Dim fs As IO.FileStream = IO.File.Create(p)
        fs.Write(b, 0, b.Length) 'write some data
        fs.Close()
        fs.Dispose()
    Next

    fn = IO.Directory.GetFiles(testF) 'retrieve files just created
    For Each f As String In fn
        If IO.File.Exists(f) Then
            IO.File.Delete(f)
        End If
        If IO.File.Exists(f) Then 'shouldn't exists
            IO.File.Delete(f)
        End If
    Next

    If IO.Directory.Exists(testF) Then
        IO.Directory.Delete(testF, True)
    End If
End Sub