我有以下代码:
Try
For Each file As String In My.Computer.FileSystem.GetFiles("directory")
FormMain.listbox.Items.Add(file)
Next
Catch
End Try
它会给我目录中的文件列表(例如:C:\ DIR \ file.txt),但是我只需要获取文件名(例如:file.txt),而无需获取带有地址的名称。提前致谢 !
您必须使用FileInfo类
Try
For Each file As String In My.Computer.FileSystem.GetFiles("directory")
Dim information = My.Computer.FileSystem.GetFileInfo(file )
FormMain.listbox.Items.Add(information.Name)
Next
Catch
End Try
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句