高分请教一简单问题？

Question

If dir(sFileName)<>"" Then....

Answer 1

If Dir(路径 & "\文件名") <> "" Then
      Kill 路径 & "\文件名"
   End If

Answer 2

定义一个文件操作的对象
Dim fsoSys As New Scripting.FileSystemObject '文件
Dim fsoRootFolder As Folder '文件夹
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(App.Path & "\moban\")
fs.FileExists(filepath)

Answer 3

没错用Dir()
如果找到了还回原路径和文件名
如果没找到还回空字符串

Answer 4

If Dir("C:\readme.txt") <> "" Then  Kill "C:\readme.txt"