Dim fs As New FileSystemObject
If fs.FileExists("D:\*.jpg") Then '可以用通配符,或者固定文件名
MsgBox "文件存在"
Kill ("D:\tempCG.jpg")
Else
MsgBox "文件不存在"
End If
黑色头发:http://heisetoufa.iteye.com/
Dim fs As New FileSystemObject
If fs.FileExists("D:\*.jpg") Then '可以用通配符,或者固定文件名
MsgBox "文件存在"
Kill ("D:\tempCG.jpg")
Else
MsgBox "文件不存在"
End If