項目

ファイル削除(Kill)

例

Option Compare Database
Option Explicit

'++++++++++++++++++++++++++++++++++++++++++++++++++
'■ファイル削除(Kill)
'++++++++++++++++++++++++++++++++++++++++++++++++++
Private Sub コマンド1_Click()
On Error GoTo err_handle

    Dim pathName    As String

    pathName = "c:\temp\hoge.txt"   'ファイルのパス
    
    Kill pathName                   'ファイル削除

    Exit Sub

err_handle:

    Debug.Print Err.Description

End Sub