如何重复使用同一程序 — 编程爱好者社区

主题：如何重复使用同一程序

nianxiog [专家分：0] 发布于 2006-09-20 08:00:00

在QB中,要反复调用同一程序,除按任意键返回--按RUN---按STAR重新开始外,还可用什么指令,使其第一次任务结束后,继续用该程序执行新的任务.

本帖地址： http://bbs.pfan.cn/post/193183.html

回复列表（共5个回复）

沙发

maxumi [专家分：2200] 发布于 2006-09-20 08:14:00

在程序末尾加2句:

CLEAR
RUN

板凳

maxumi [专家分：2200] 发布于 2006-09-20 08:22:00

不过这样就只能用Ctrl+Break退出了, 可以这样

换掉前面那帖的2句, 改成这样, 加在程序末尾.

INPUT"Exit [y/n]";stri$
IF stri$="y" OR stri$="Y" THEN END
CLEAR
RUN

这样每次运行完毕时问你是否退出, 输入y退出, 否则重新执行一遍程序.

3 楼

moz [专家分：37620] 发布于 2006-09-20 11:18:00

把你的主程序改成子程序,
在主程序那里做循环.

4 楼

nianxiog [专家分：0] 发布于 2006-09-20 13:50:00

maxumi先生的指令我输不进去,是不是THEN END要另起一行?
moz先生告诉我的方法我还不会用.不知能不能更祥细一些,我愚蠢得很.谢谢两位热心的朋友!

5 楼

moz [专家分：37620] 发布于 2006-09-20 14:23:00

1. 新建一个SUB,( EDIT-New SUB )
2. 把主程序里的东西(除定义语句外)全放进去.
3. 在主程序里做一个循环(随便什么循环都可以),调用这一新SUB.

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：如何重复使用同一程序

回复列表（共5个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：如何重复使用同一程序

回复列表 （共5个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共5个回复）