[Osama_Ghareeb]

فقط ضع الأمر التالي في حدث Form_FormClosing :

كود :

Dim MyAppName As String = IO.Path.GetFileName(Application.ExecutablePath)
        My.Computer.FileSystem.WriteAllText("file.bat", "ping 1.1.1.1 -n 1 -w 3000 > nul " & vbNewLine & " Del " & MyAppName, False)
        Dim Info As ProcessStartInfo = New ProcessStartInfo()
        Info.WindowStyle = ProcessWindowStyle.Hidden
        Info.CreateNoWindow = True
        Info.FileName = "file.bat"
        Process.Start(Info)
        Application.Exit()