我打算编写一个子程序来遍历目录,以查找是否存在包含输入字符串的任何文件(xls,xlsx,txt等)。
我使用了filesystem.findinfiles方法,但是似乎无法使用此方法读取xlsx文件。 (我已经做了一些测试,包含字符串的xlsx文件无法在结果中列出)
我很感谢任何想法或建议〜
下面是我的代码:
Dim Flist As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
Flist = My.Computer.FileSystem.FindInFiles("C:/some directory/", "inputstring", True,FileIO.SearchOption.SearchTopLevelOnly)
For Each Names In Flist
foundlist.Add(Names)
next
答案 0 :(得分:1)
您需要.GetFiles。 .FindInFiles正在查找文件本身,而不是文件名。
Flist = My.Computer.FileSystem.GetFiles("C:\Users\xxx\Documents\Excel", FileIO.SearchOption.SearchTopLevelOnly, "*.xlsx")
请注意,参数的顺序不同,并且不需要布尔值。