Kill Statement

Kill filename

Kill will only delete files.  To remove a directory use the RmDir Statement

Related Topics: RmDir

Example:

Const NumberOfFiles = 3

Sub Main ()

    Dim Msg          ' Declare variable.

    Call MakeFiles()    ' Create data files.

    Msg = "Several test files have been created on your disk. You may see "

    Msg = Msg & "them by switching tasks. Choose OK to remove the test files."

    MsgBox Msg

    For I = 1 To NumberOfFiles

        Kill "TEST" & I        ' Remove data files from disk.

    Next I

End Sub

Sub MakeFiles ()

    Dim I, FNum, FName         ' Declare variables.

    For I = 1 To NumberOfFiles

        FNum = FreeFile    ' Determine next file number.

        FName = "TEST" & I

        Open FName For Output As FNum ' Open file.

        Print #FNum, "This is test #" & I    ' Write string to file.

        Print #FNum, "Here is another ";  "line";  I

    Next I

    Close               ' Close all files.

End Sub