''''''''''''''''''''''''''''
dim ptrFile as String
ptrFile = Dir$("C:\documenti\tmp\*")

while ptrFile <> ""
kill "C:\documenti\tmp\" & ptrFile & ""
ptrFile = Dir$
wend

'Ovviamente se "ptrFile" = "" nella directory "tmp" non ci sono files
'''''''''''''''''''''''''''''

N.B. la prossima volta COMUNQUE apri le discussioni legate
al Visual Basic nell'apposito SUB-FORUM.