求助各位关于子程序运行问题

Mushiyi

求助各位关于子程序运行问题

程序的设计运行方式为：

主程序——>子程序1——>子程序2——>子程序3

运行中间出现的问题：

就是子程序1在运行时会出现偶发的运行到某个点不动了，然后整个程序就卡死在这儿了。

能不能个子程序1加个运行时间限制，就是子程序1在运行不走的时后（正常程序整个运行20秒），就是程序开始运行30秒后，因为子程序1没有运行完，就直接跳转到子程序2

类似于以下的这种结构：

主程序——>子程序1——>子程序2——>子程序3
                       |___________|
                        子程序1不动，整个过程超过30秒后

zainex

用 线程 实现：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
运行结束	逻辑型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
句柄	整数型

启动线程 (&子程序1, , 句柄)
等待线程 (句柄, 30 × 1000)  ' 最多运行30秒' 删掉下面两行，子程序1会一直运行
qz结束线程 (句柄)
关闭线程句柄 (句柄)
子程序2 ()
子程序3 ()

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
退出	逻辑型

运行结束 ＝ 假
' 模拟运行
判断循环首 (退出 ＝ 假)
调试输出 (“正在运行子程序1”)
延时 (1000)
判断循环尾 ()
运行结束 ＝ 真

子程序名	返回值类型	公开	备 注
子程序2

调试输出 (“正在运行子程序2”)

子程序名	返回值类型	公开	备 注
子程序3

调试输出 (“正在运行子程序3”)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 运行结束, 逻辑型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 句柄, 整数型<br /> <br /> 启动线程 (&子程序1, , 句柄)<br /> 等待线程 (句柄, 30 × 1000)  ' 最多运行30秒' 删掉下面两行，子程序1会一直运行<br /> qz结束线程 (句柄)<br /> 关闭线程句柄 (句柄)<br /> 子程序2 ()<br /> 子程序3 ()<br /> <br /> <br /> .子程序 子程序1<br /> .局部变量 退出, 逻辑型<br /> <br /> 运行结束 ＝ 假<br /> ' 模拟运行<br /> .判断循环首 (退出 ＝ 假)<br />     调试输出 (“正在运行子程序1”)<br />     延时 (1000)<br /> .判断循环尾 ()<br /> 运行结束 ＝ 真<br /> <br /> <br /> .子程序 子程序2<br /> <br /> 调试输出 (“正在运行子程序2”)<br /> <br /> .子程序 子程序3<br /> <br /> 调试输出 (“正在运行子程序3”)

hxnr

做多线程不就可以了

lyie15

目前我理解的，不存在程序会卡住不运行的说法。一般都是你在里面加了循环或判断。没有达成条件，然后程序就一直在里面空转，不会跳出来。其实只要找到这个循环的点，修改好判断条件即可。

至于你说的加上时间限制，也是可行。创建一个新进程用于判断时间。来强制结束超时的进程。但是感觉好怪，有BUG不从BUG处解决，反而再写一个新的程序来处理BUG。万一新程序也出BUG呢，不就成了无限套娃了？

xxhaishixx

整个运行取决于你的代码，如果程序1有死循环或者循环执行，这个时候就会出问题（比如内存溢出），这个时候程序1是不会执行的，那么在程序2里面可以检测程序1（内部通信）是可以的，或者更直接一点，以线程的方式结束程序1再运行，以此类推其他子程序。