Nothing

这是没有办法的，任务管理器关掉进程是直接杀掉进程，不会执行Cancel=False的操作了。

只能想其他的办法
1、将程序写成系统服务，任务管理器结束不了，但kill命令还是可以杀掉。
2、在Form_Unload重新执行程序 Shell App.Path & "\" & App.EXEName & ".exe"

Nothing

你做这东西，有点像流氓软件了，以前3721就用过这样的方法。