小吳 VBQA 程式設計討論

拜託拜託各位大大給予回覆~"~
當我使用刪除的時候，因為所要刪除的目錄跟檔案
裡面有包括.exe執行檔，在98裡面他會跳出"確認視窗"
有四個按鈕【1.是 2.全部刪除 3.否 4.取消】
可以不要這個確認視窗嗎?，但我還要顯示刪除的動畫
或者VB裡面可以幫我按下全部刪除的按鈕嗎?
拜託各位了，找了很久的資料，摸不著頭緒~"~
在下的程式碼：
=======宣告內容=======
Option Explicit
Private Type SHFILEOPSTRUCT
hwnd As Long
　　　　wFunc As Long
　　　　pFrom As String
　　　　pTo As String
　　　　fFlags As Integer
　　　　fAnyOperationsAborted As Long
　　　　hNameMappings As Long
　　　　lpszProgressTitle As Long
End Type
Private Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" _
(lpFileOp As SHFILEOPSTRUCT) As Long
Private Const FO_MOVE = &H1
Private Const FO_COPY = &H2
Private Const FO_DELETE = &H3
Private Const FOF_SILENT = &H4
Private Const FOF_RENAMEONCOLLISION = &H8
======command1內容=======
Dim delfile As SHFILEOPSTRUCT
delfile.wFunc = FO_DELETE
　　delfile.pFrom = ("D:\天堂(Lineage212C)") + Chr(0)
　　Call SHFileOperation(delfile)