使用vba检查文件到达指定文件夹的时间

Question

我希望在文件进入该文件夹时捕获文件夹的证据，并在使用vba一段时间后自动删除。有可能吗？

Dim fso As Object
Set fso = CreateObject("scripting.filesystemobject")
    Dim tm: tm = Now() + TimeSerial(0, 10, 0)
    Dim fld: Set fld = fso.GetFolder("D:\Temp\ABC")
        Do Until fld.Files.Count <> 0
           If tm = Now() Then
           Exit Do
           End If
        Loop