帮忙看看代码这么写是哪儿出问题了？

[新晋技术宅]

Dim Logsfolder As String = "D:\123"
            Dim LogFileList As String() = System.IO.Directory.GetFiles(Logsfolder)

            For Each Logfile In LogFileList
                MsgBox(Logfile)
                Dim logsReader As New StreamReader(Logfile)
                LogContent = logsReader.ReadToEnd
                Dim errorStr = InStr(1, LogContent, "123")
                If errorStr <> 0 Then
                    'MsgBox(Logfile)
                    Kill(Logfile)

                End If

            Next

一直出现文件正在使用的错误，不太懂，求指教！！！

[新晋技术宅]

没人帮忙看看哇

[青岛小帅锅]

..........
文件Read 完毕之后肯定要关闭文件哦。。。
就像数据库使用完毕了。。。要关闭一样。。。要不别人怎么访问呢？？

[x8bits]

把这两句
Dim logsReader As New StreamReader(Logfile)
LogContent = logsReader.ReadToEnd
改为

Using logsReader As New StreamReader(Logfile)
LogContent = logsReader.ReadToEnd
End Using

[mystery1000]

Dim Logsfolder As String = "D:\123"
Dim LogFileList As String() = System.IO.Directory.GetFiles(Logsfolder)
Dim logsReader As StreamReader
For Each Logfile In LogFileList
MsgBox(Logfile)

logsReader=New StreamReader(Logfile)
LogContent = logsReader.ReadToEnd
Dim errorStr = InStr(1, LogContent, "123")
If errorStr <> 0 Then
'MsgBox(Logfile)
Kill(Logfile)

End If

Next
logsReader .close