如何使用代码从目录中搜索和删除多个文本文件
How to search and delete multiple text files from a directory using code
我的表单上有一个树视图控件,我从这个表单中将数据保存到文本文件到桌面目录,格式如下:
- 段Michael.TXT
- 段Michael.GAT
- 迈克尔Torns.STD
我在表单上还有一个按钮,用户可以在选择该节点后单击该按钮来删除该节点。
在我的树视图中,有一个节点,其文本是“Michael”。
我要实现的是用户选中这个节点后,点击删除按钮,节点被删除,桌面目录下所有名字中有“Michael”的文本文件也被删除.
我可以指定在其中找到文本文件的子文件夹,但不知道如何继续实现我的目标,因此请提供帮助。
我正在使用 Visual Basic 2010 Express。
‘This is the sub-folder directory in which the text files are found
Dim GB = New DirectoryInfo(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "Student Names\" & TextBox1.Text))
Dim FGY As TreeNode
FGY = TreeView1.SelectedNode
‘Need help here…
使用 .GetFiles 列出所有具有特定搜索模式的文件:
Dim pattern As string = "*" & FGY.Text & "*"
For Each fi In GB.GetFiles(pattern)
fi.Delete
Next
我的表单上有一个树视图控件,我从这个表单中将数据保存到文本文件到桌面目录,格式如下:
- 段Michael.TXT
- 段Michael.GAT
- 迈克尔Torns.STD
我在表单上还有一个按钮,用户可以在选择该节点后单击该按钮来删除该节点。
在我的树视图中,有一个节点,其文本是“Michael”。
我要实现的是用户选中这个节点后,点击删除按钮,节点被删除,桌面目录下所有名字中有“Michael”的文本文件也被删除.
我可以指定在其中找到文本文件的子文件夹,但不知道如何继续实现我的目标,因此请提供帮助。
我正在使用 Visual Basic 2010 Express。
‘This is the sub-folder directory in which the text files are found
Dim GB = New DirectoryInfo(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), "Student Names\" & TextBox1.Text))
Dim FGY As TreeNode
FGY = TreeView1.SelectedNode
‘Need help here…
使用 .GetFiles 列出所有具有特定搜索模式的文件:
Dim pattern As string = "*" & FGY.Text & "*"
For Each fi In GB.GetFiles(pattern)
fi.Delete
Next