如何判断系统下的文件

Question

我想判断C:\Program Files\AutoCAD 2002\acad.exe   是否存在  用DIR可以吗 Dim strNameOfQuery     As String
  Dim strValueOfRe     As String
    
  strNameOfQuery = "C:\Program Files\AutoCAD 2002\acad.exe"
  strValueOfRe = Dir(strNameOfQuery)
  If strValueOfRe = strNameOfQuery Then
        MsgBox "文件存在“   "
  Else
      MsgBox "文件不存在”   "
  End If
    
  
End Sub怎么不行

Answer 1

if Dir(strNameOfQuery) <>"" then
  MsgBox "文件存在“   " 
Else 
  MsgBox "文件不存在”   " 
End If 

Answer 2

一般这样就行
 Dim strNameOfQuery     As String
  Dim strValueOfRe     As String
    
  strNameOfQuery = "C:\Program Files\AutoCAD 2002\acad.exe"
  strValueOfRe = Dir(strNameOfQuery)
  If strValueOfRe <> "" Then
        MsgBox "文件存在“   "
  Else
      MsgBox "文件不存在”   "
  End If
    
  
End Sub

Answer 3

基本就象楼上的一样,用DIR 可以模糊查找也可以精确查找,根据返回值去判断是否找到文件.

Answer 4

我回复时没看到cbm666的回复，刚一回复，就看到了，而在我前，和我的基本一样，你说不晕吗？