• Home
 · 
• Files/File Controls/Input/Output
 · 
• Delete a file that exists on a 3.5 floppy disk.

Delete a file that exists on a 3.5 floppy disk.

Delete a file that exists on a 3.5 floppy disk.

Rate Delete a file that exists on a 3.5 floppy disk.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'make sure to create the file byefile.txt on a 3.5 floppy
'to make sure the file is deleted after you execute this program.
Private Sub mnuEditDeleteFile_Click()
'delete a file existing on disk
Dim Delete
On Error GoTo ErrHandler:
Delete = MsgBox("Are you sure you want to delete this file?", vbYesNo + vbQuestion, "Delete File")
If Delete = vbYes Then
    Kill "a:\byefile.txt"
End If
ErrHandler:
    MsgBox "File does not exist, create a file to delete", vbCritical
End Sub