控制台程序关闭事件

.支持库 spec

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

SetConsoleCtrlHandler (&handle, 真)
标准输入 ()
返回 (0) ' 可以根据您的需要返回任意数值

.子程序 handle, 逻辑型
.参数 type, 整数型

.如果真 (type ＝ 2)
调试输出 (“程序关闭”)
.如果真结束
返回 (假)