看板 Visual_Basic 關於我們 聯絡資訊
Dim fso, folder, files Set fso = CreateObject("Scripting.FileSystemObject") Set folder = fso.GetFolder("R:\e") ' 取代為目標目錄的路徑 Set files = folder.Files msgbox files.Count If files.Count > 0 Then ' 檢查目錄下是否有檔案 files(files.Count - 1).Delete ' 刪除目錄下最後一個檔案 End If Set files = Nothing Set folder = Nothing Set fso = Nothing GPT寫的,第8行出問題 WScript.Echo files.Item(0).Name 上面這行也"程序呼叫或引數不正確" 那位教教是那出錯? GPT&BING怎麼問都說沒錯 thx -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.40.232.232 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1681536143.A.BDB.html
MOONRAKER: 繼續問ChatGPT問到他招供阿 04/16 09:59