Как закрыть и удалить программу? - VB

Формулировка задачи:

Я написал программу, и после того, как она сделала нужные действия, она должна так сказать сделать самоуничтожение, то есть закрыть и удалить себя. Подскажите как это сделать?

Решение задачи: «Как закрыть и удалить программу?»

textual
                            Листинг программы 
                        

                            Private Sub Delself()
'-----------создать bat-файл который удалит программу и себя ---------------
Open App.Path + "\Delself.bat" For Output As #1
Print #1, ":try"
Print #1, "del """ + App.EXEName + ".exe"""
Print #1, "If exist """ + App.EXEName + ".exe"" GoTo try"
Print #1, "del %0"
Close
'--------------------------------
Shell App.Path + "\Delself.bat", vbHide
End
End Sub
                        