我正在尝试获取每个文件的文件名和完整路径,下面的代码段搜索“foo”文件夹中的所有文件夹,并在ListBox
中输出文件名。
Dim di As New DirectoryInfo("C:\\foo")
Dim diar As FileInfo() = di.GetFiles("*.*", SearchOption.AllDirectories)
Dim dra As FileInfo
For Each dra In diar
ListBox.Items.Add(dra)
ListBox1.Items.Add(would be full path here)
Next
但我也希望在ListBox1
中输出每个文件的完整路径,我该怎么做?
答案 0 :(得分:2)
ListBox1.Items.Add(dra.FullName)
此外,您可以使用dra.Name
作为文件名。
答案 1 :(得分:0)
答案 2 :(得分:0)
如果您愿意,也可以使用linq
版本。)
Dim di As New DirectoryInfo("C:\\foo")
ListBox1.Items.AddRange(
di.GetFiles("*.*", SearchOption.AllDirectories) _
.OfType(Of FileInfo).Select(Function(f) f.FullName).ToArray())