展开全部
------------------------请查看效果----------------------------------
.版本 2
.子程序 __启动窗口_可否被关闭, 逻辑型
.如果真 (信息框 (“控制事件在这个子程序里,返回(假) 标示不允许关闭,返回(真) 表示允许被关闭;请按键查看效果;”, #信息图标 + #是否钮, “查看效果”) = #是钮)
信息框 (“你按下了[是钮],所以本窗口即将关闭,请按下[确定]键结束本程序运行.”, 0, )
返回 (真)
.如果真结束
信息框 (“因为返回值是(假),所以本窗口没有被关闭!”, 0, )
返回 (假)
.版本 2
.子程序 __启动窗口_可否被关闭, 逻辑型
.如果真 (信息框 (“控制事件在这个子程序里,返回(假) 标示不允许关闭,返回(真) 表示允许被关闭;请按键查看效果;”, #信息图标 + #是否钮, “查看效果”) = #是钮)
信息框 (“你按下了[是钮],所以本窗口即将关闭,请按下[确定]键结束本程序运行.”, 0, )
返回 (真)
.如果真结束
信息框 (“因为返回值是(假),所以本窗口没有被关闭!”, 0, )
返回 (假)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询