Question

如何用VB编写一个程序,使文件在规定时间内删除?

Answer 1

是在指定时刻删除吗？
还是几秒后删除？
Dim a
Private Sub Form_Load()
Timer1.Interval = 1000
a = InputBox("请输入时刻，格式： hh ：mm ： ss")
End Sub

Private Sub Timer1_Timer()
If Time = FormatDateTime(a) Then
MsgBox "已删除"
Kill "d:\1.txt"
Timer1.Enabled = False
End If
End Sub

追问

我不会，在学视频，，，自己再把金山换成微软的

追答

代码如上

Answer 2

要删除它本身吗？