变量 启动时间 为 长整数型'程序集变量 事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型) 如果 键代码=返回键 则 ok弹出提示2.弹出("再按一次退出",0,3) 如果 取启动时间()-启动时间<2000 则 结束程序() 否则 启动时间=取启动时间() 结束 如果 结束 如果 结束 事件
变量 启动时间 为 长整数型'程序集变量 事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型) 如果 键代码=返回键 则 ok弹出提示2.弹出("再按一次退出",0,3) 如果 取启动时间()-启动时间<2000 则 结束程序() 否则 启动时间=取启动时间() 结束 如果 结束 如果 结束 事件