vb 怎样从文件夹中按文件名搜索txt文件

Question

就是一个text文本框，只要输入txt文件名的前5位，就能在指定的路径文件夹内所有的txt文件中找出这个txt文件并删除，求代码？万分感谢！

Answer 1

比如删除d:\aaa文件夹中123起头的文本文件
Dim file As String
file = Dir("d:\aaa\123*.txt") '第一次给出文件参数，里面包含通配符
Do Until file = ""
Kill "d:\aaa\" & file
file = Dir() '接下去忽略参数，直到返回空串时退出循环
Loop