Textbox1.Text = part
'searching the folder with key word from Textbox1'
' Only get files that contain the keyword stored in 'part' string
Dim dirs As String() = Directory.GetFiles("d:\data\", "*$part*")
'display the result
Dim dir As String
For Each dir In dirs
Listbox1.Items.Add(dir)
Next
我无法在文件夹中搜索名称中包含关键字的文件。关键字存储在“part”变量中。
答案 0 :(得分:1)
我相信你想做点什么:
Dim dirs As String() = Directory.GetFiles("d:\data\", "*" & part & "*")
这将根据part
变量为过滤器构建字符串。
答案 1 :(得分:0)
这是一个单行:
Listbox1.Items.AddRange(Directory.GetFiles("D:\data\",
string.Format("*{0}*", Textbox1.Text)))