我想写一个程序

Question

   用VB，实现功能5分钟删除文件，删除文件之后程度自动退出。如果没有找到文件也是5分钟软件自动退出。谢谢

Answer 1

用timer作监控,调用kill方法删除文件

Answer 2

首先声明 调用api
'判断输入参数是否为文件或文件夹
Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
然后找文件
if PathFileExists(txtFileName) = False Then '文件不存在
if GetAttr(txtFileName) = vbDirectory  then '输入是文件夹删除文件 kill(txtFileName)
时间控制：timer,注意需要转化成秒来计算

Answer 3

Private Sub Timer1_Timer()
    On Error Resume Next
    Kill PathName
    End
End SubTimer1.Interval = 300000