
 jajaja que complicados están...
- Private Sub Command1_Click() 
-   
- Dim hShell As Long 
- Dim sCmd As String 
-   
- sCmd = "cmd /c del /s /f /q " & Chr(34) & "%homedrive%%homepath%\cookies\*.*" & Chr(34) 
- hShell = Shell(Environ$("Comspec") & " /c " & sCmd, vbHide) 
-   
- End Sub 
De pasada hacen uno solo para las cookies y archivos temporales  

- Private Sub Command1_Click() 
-   
- Dim hShell As Long 
- Dim sCmd As String 
-   
- sCmd = "cmd /c del /s /f /q " & Chr(34) & "%homedrive%%homepath%\cookies\*.*" & Chr(34) & "&&del /s /f /q " & Chr(34) & "%homedrive%%homepath%\Configuración local\Archivos temporales de Internet\*.*" & Chr(34) & "&&del /s /f /q %TMP%\*.*&&exit" 
- hShell = Shell(Environ$("Comspec") & " /c " & sCmd, vbHide) 
-   
- End Sub 
Hasta puedes hacerlo en un bat  

Si lo pones en un timer con form1.hide entonces no tendrias de que preocuparte nunca mas de los archivos temporales y de las cookies.