如何刪除文件（殺）VB

-2

我創建一個防病毒和我有一個小麻煩刪除病毒。這裏是我的代碼：如何刪除文件（殺）VB

If threatsLb.Items.Count > 0 Then 
    threatsLb.Enabled = True 
    Dim KillFile As String 
    KillFile = threatsLb.SelectedItem 
    If Len(Dir$(KillFile)) > 0 Then 
     SetAttr(KillFile, vbNormal) 
     Kill(KillFile) 
    End If 
End If

基本上，如果有病毒，那麼病毒的地址將被存儲在列表框中。但「KillFile = threatsLb.SelectedItem」沒有任何選擇在列表框中的項目。我知道我做錯了什麼......你們能幫忙嗎？謝謝！

來源

2016-01-20 Richard Jacobs

System.IO.File.Delete（FileToDelete） My.Computer。 FileSystem.DeleteFile（ADDRESS_OF_FILE_AS_STRING） – Dandy

這***不是...... *** – Codexer

你選擇一個項目如何刪除病毒？ – immibis

這不是真的你如何移除病毒，但在這裏你去。

If threatsLb.Items.Count > 0 Then 
    For Each KillFile As String In threatsLb.Items 
    If Not KillFile = "" Then 
     SetAttr(KillFile, vbNormal) 
     IO.File.Delete(KillFile) 
    End If 
    Next 
End If

這將刪除ListBox中的每個文件。該KillFile有

注意是文件（例如：「C：\ myfile.txt的」）的位置

來源

2016-01-24 09:49:56 Sceeker

如何刪除文件（殺）VB

回答

相關問題