選択したディレクトリの中の一時ファイルを一括で消したいのですが
実行すると「パスが違う｣と怒られます。助けてください。
--　以下ソース　--
Private Sub Command1_Click()

ChDrive Drive1
ChDir Dir1

On Error GoTo Errorhundra
Kill "*.tmp"
Exit Sub

Errorhundra:

MsgBox "tmp file was nothing there."

End Sub