在VB中如何判断一个文件夹中是否包含*.txt文件?

解决方案 »

  1.   

    If Dir(FilePath & "*.txt") <> "" Then
            MsgBox "存在.txt文件"
        End If
      

  2.   

    不过DIR不能发现一些隐藏文件
      

  3.   

    发现隐藏的文件,好办如下,发现所有文件类型为.txt的文件:If Dir(FilePath & "*.txt", vbSystem Or vbHidden Or vbReadOnly Or vbNormal) <> "" Then
        MsgBox "存在.txt文件"
    End If
      

  4.   

    同意 junki(『打破沙锅问到底』)