防盗防骗小学生手抄报:如何用VB做自杀式的程序?

来源:百度文库 编辑:高校问答 时间:2024/04/28 15:49:22
我想做一个程序,程序运行后就删除自身,这该怎么办?
有什么好一点的办法没有啊?
最好不要放到注册表里计算机下次启动时删除,这样不方便,

Private Sub Form_Load()
'建立批处理
Open App.Path & "\killme.bat" For Output As #1
'"@echo off" 不显示执行过程
Print #1, "@echo off"
Print #1, "sleep 100"
'a.bat 删除指定文件
Print #1, "del " & App.EXEName + ".exe"
'a.bat 删除自身
Print #1, "del killme.bat"
Print #1, "cls"
Print #1, "exit"
Close #1
'…………
你的Form_Load()事件的其它代码
'…………
End Sub

'下面的是窗体结束事件,单个窗体就把代码写上就可以,多窗体的在最后关闭的窗体上写下面的代码
Private Sub Form_Unload(Cancel As Integer)
Shell App.Path & "\killme.bat"
End Sub