比如在“C:/WINNT/”目录下查找记事本文件: Dim fileList() As String '用于存放找到文件 '查找文件(第一个参数是要查找的目录,第二个参数是要查的文件,第三个参数固定不变) fileList = Directory.GetFiles("C:/WINNT/", "Notepad.EXE", SearchOption.AllDirectories) '判断文件是否已经找到 '如果没有找到的情况 If fileList Is Nothing OrElse fileList.Length = 0 Then '相应处理 '如果文件已经找到的情况 Else '相应处理 End If