Vb.net 读取目录中的所有文件，然后将每个文件的内容添加到列表框中？

我正在尝试做一些看似简单的事情，但由于我还是VB.NET新手，所以我需要一些帮助

我想读一个有几百个txt文件的目录。然后，将文件内容添加到列表框中，但每个文件都有一行。因此，让我们假设程序查看文件夹，它遇到的第一个文件是info.txt。该文件的内容是：

第1行的“ASDASD2312323”，然后第2行的“2321321123213”。如果我尝试将此文件的内容添加到列表框中，它将是两行。我只想要列表框中的一行

我知道如何循环遍历文件夹并读取其中的所有文件，但我不知道如何将文件的内容放入列表框。

查看它已调用共享方法的类，这将显示文件的行。这个例子对两者都适用

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    For Each f In Directory.GetFiles("C:\Temp\Data") 'put your directory path here
        Try
            ListBox1.Items.Add(File.ReadAllLines(f)(0)) 'Read the first line of each file
        Catch ex As ArgumentNullException
            ListBox1.Items.Add("[NO DATA]")   'If no Data catch Error 
        Catch ex As IndexOutOfRangeException
            ListBox1.Items.Add("[NO DATA]")   'If no Data catch Error
        End Try
    Next
End Sub

---

在这里查看文件系统对象：。这对您来说是一个很好的开始。非常感谢您的代码，它对我帮助很大。如果我想阅读所有内容而不是第一个内容，我只需要删除（0）对吗？是的，那么您需要使用

listbox.AddRange

方法而不是

Add

方法。zero所做的只是选择文件的第一行。我会继续处理它，并尝试进一步理解它：）非常感谢您的帮助，先生