如何在Visual Basic中循环处理多个XML文件？

你的代码核心问题在于：循环里只是反复创建StreamReader实例，但完全没有执行读取文件内容的操作，而且每次循环都会覆盖streamReader变量，导致前一个文件的实例被直接丢弃，最终只有最后一个文件的StreamReader被保留，但也没读取任何内容。

要实现多文件读取，需要在循环内完成「打开文件→读取内容→处理/存储内容→释放资源」的完整流程，同时优化资源管理和异常提示：

Dim list As New List(Of String)
Dim classificationFiles As New List(Of String)
classificationFiles.Add("classifications.xml")
classificationFiles.Add("classifications2.xml")

Try
    For Each classificationXML In classificationFiles
        ' 使用Using自动管理StreamReader资源，无需手动Close
        Using streamReader As New StreamReader(classificationXML)
            ' 读取文件全部内容并添加到列表
            Dim fileContent As String = streamReader.ReadToEnd()
            list.Add(fileContent)
            ' 也可以在这里直接处理内容，比如写入txtInfo
            frmMain.txtInfo.AppendText(vbCrLf + $"已读取文件: {classificationXML}" + vbCrLf)
            frmMain.txtInfo.AppendText(fileContent + vbCrLf)
        End Using
    Next
Catch ex As Exception
    ' 异常提示改为当前出错的文件名，而非固定值
    frmMain.txtInfo.AppendText(vbCrLf + $"无法打开文件 '{classificationXML}', 错误信息: ")
    frmMain.txtInfo.AppendText(ex.Message + vbCrLf)
    Return False
End Try

• 添加读取操作：通过ReadToEnd()读取文件内容，并存入list或直接处理。
• 使用Using语句：自动释放文件资源，避免因忘记关闭文件导致的资源占用问题。
• 优化异常信息：错误提示中使用当前循环的文件名，方便定位具体哪个文件出错。

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