1. 程式人生 > >如何刪除檔案及資料夾下的所有檔案 vb

如何刪除檔案及資料夾下的所有檔案 vb

MyPath = target & "/"  ' 指定路徑。MyPath 是要刪除的資料夾
            myname = Dir(MyPath, vbDirectory)   ' 找尋第一項。
            Do While myname <> ""
               myname = Dir
               If myname = "." Or myname = ".." Or myname = "" Then
               Else
              Kill MyPath & myname ‘myname 是該資料夾中的檔案
               End If
               txtSql.Text = txtSql.Text & myname
            Loop