定时销毁程序例程

计时 ＝ 计时 ＋ 1 ' 计算已经使用的时间
剩余时间 ＝ 到整数 (编辑框1.内容) － 计时 ' 整理剩余使用时间
标签3.标题 ＝ 到文本 (剩余时间) ' 显示剩余的时间
.如果真 (剩余时间 ＜ 0) ' 判断可以使用时间是不是已经为0
信息框 (“感谢您的使用！再见”, 0, ) ' 关闭提示
销毁 () ' 关闭命令