2 
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”变量中。

4

2 回答 2

1

我相信你想做这样的事情：

Dim dirs As String() = Directory.GetFiles("d:\data\", "*" & part & "*")

这将基于part变量为过滤器构建字符串。

于 2013-05-29T16:46:30.067 回答
0

这是一个单行：

Listbox1.Items.AddRange(Directory.GetFiles("D:\data\", $"*{Textbox1.Text}*"))
于 2013-05-29T16:53:16.903 回答