Question

VB删除一个文件，如果这个文件不存在自动提示，这个代码怎么写！

如果并没有 1.txt 怎样停止它

Kill "1.txt"

Answer 1

用filesystemobject对象模型（注意在工程菜单中引用Microsoft Scripting Runtime）
代码如下：
Dim fso As New FileSystemObject
Private Sub Command1_Click()
If fso.FileExists(App.Path & "\a.txt") Then
fso.DeleteFile (App.Path & "\a.txt")
Else
MsgBox ("文件不存在")
End If
End Sub

Answer 2

if dir(路径+文件名)<>"" then

kill "路径+1.txt"

end if

Answer 3

dir 先查检是否存在

要不就利用错误代码判断。

Answer 4

当文件不存在时 就会产生一个错误代码 可以使用 错误捕获来完成你的要求

Answer 5

有个文件存在判断的属性(filesystemobject).