Bunları buldum;

Sub Clear_Temp_Files()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8 ")
End Sub


Sub Clear_Cookies()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2")
End Sub



Sub Clear_History()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1")
End Sub



Sub Clear_Form_Data()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16")
End Sub



Sub Clear_Saved_Passwords()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32")
End Sub



Sub Clear_All()
Shell("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255")
End Sub

Eğer sorun çözülmez ise tekrar yazabilirsin konuya.