Sub DeleteFile(ByVal FilePath As String)
        If My.Computer.FileSystem.FileExists(FilePath) = True Then
            My.Computer.FileSystem.DeleteFile(FilePath)
        Else
            MsgBox("Le fichier à supprimer n'existe pas")
        End If
    End Sub
    'Exemple d'utilisation
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        DeleteFile("C:\test.txt")
    End Sub

    Sub DeleteFile(ByVal FilePath As String)
        If Dir(FilePath, vbHidden) <> "" Then
            Dim FSO = CreateObject("Scripting.FileSystemObject")
            FSO.deletefile(FilePath)
            FSO = Nothing
        Else
            MsgBox("Le fichier à supprimer n'existe pas")
        End If
    End Sub
    'Exemple d'utilisation
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        DeleteFile("C:\test.txt")
    End Sub

    Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long
    Sub KillFile(ByVal FilePath As String)
        If Dir(FilePath, vbHidden) <> "" Then
            DeleteFile(FilePath)
        Else
            MsgBox("Le fichier à supprimer n'existe pas")
        End If
    End Sub
    'Exemple d'utilisation
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        KillFile("C:\test.txt")
    End Sub

Sub DeleteFile(ByVal FilePath As String)
    If Dir(FilePath, vbHidden) <> "" Then
        'Utilisation de Kill (pas besoin de charger un FSO)
        Call Kill(FilePath)
    Else
        MsgBox ("Le fichier à supprimer n'existe pas")
    End If
End Sub

Private Sub Form_Load()
    Call DeleteFile("C:\Test.vbs")
End Sub
By Renfield

public static void deleteFile(String name) {
    java.io.File file = new java.io.File(name);
    if(file.exists())
        file.delete();
    else
        javax.swing.JOptionPane.showMessageDialog(null, "Le fichier n'existe pas !");
}

procedure DeleteThisFile(const FileName: string);
begin
  if not DeleteFile(FileName) then
    ShowMessage('Ce fichier n''existe pas');
end;

// Supprime le fichier
fSupprime("c:\fichier.txt")
// Supprime le fichier en le laissant dans la corbeille
fSupprime("c:\fichier.txt", frVersCorbeille)

public static void DeleteFile(string path)
{
   if (System.IO.File.Exists(path)) System.IO.File.Delete(path);
}

<cfif FileExists(ExpandPath('file.txt'))>
    <cffile action = "delete"  file = "c:\files\upload\file.txt">
<cfelse>
    File does not exist
</cfif>

(* Supprime un fichier. Exemple d'utilisation : remove "/home/me/file" *)
let remove file = match Sys.file_exists file with
      | true -> Sys.remove file
      | false -> raise Not_found

function del(fichier){
var fso = new ActiveXObject("Scripting.FileSystemObject");
fso.DeleteFile(fichier);
}

import os


def supp_fichier(fichier):
    os.remove(fichier)

file delete $fichier