Sub 按钮3_Click()
Dim fileName As String
fileName = "C:\recsFn.txt"
If Dir(fileName) = "" Then '文件不存在
Debug.Print "文件不存在";
Else
Debug.Print "文件存在"
End If
End Sub
Dim fileName As String
fileName = "C:\recsFn.txt"
If Dir(fileName) = "" Then '文件不存在
Debug.Print "文件不存在";
Else
Debug.Print "文件存在"
End If
End Sub