为什么我的这个循环部分没起作用？

smithlau

这是我疑惑的循环部分
.版本 2
.支持库 EThread

.子程序 子程序3
.局部变量 许可证3, 整数型

许可证3 ＝ 创建进入许可证 ()
进入许可区 (许可证3)
.判断循环首 (选择框3.选中 ＝ 真)
    .如果 (系统_是否已联网 () ＝ 假)
        _启动窗口.位置 ＝ 1
        程序_延时 (1, 1)
        播放音乐 (#掉线提示音, )
        信息框（“请注意，你已经掉线！”，0，”提示“）
    .否则
        返回 ()
    .如果结束

.判断循环尾 ()
退出许可区 (许可证3)
删除进入许可证 (许可证3)

这是控制上面那段代码的部分：
.版本 2
.支持库 EThread

.子程序 _选择框3_被单击

.如果 (选择框3.选中 ＝ 真)
    启动线程 (&子程序3, k, )
.否则
    操作判断 ＝ 6
    返回 ()

我单独测试过，代码是可行的，但是我发现一个很严重的问题，就是真当我掉线的时候，他却不提示我了，于是我去除了选框的选择状态，再次选中，代码又起作用了，能正常提示了
但是貌似运行一段时间后这段循环代码就不起作用了，请问这个是为什么呢？求详解

笨潴

启动线程，，，，应该是这个的问题，换其他多线程库
    调用格式： 〈逻辑型〉 启动线程 （子程序指针 欲执行的子程序，［整数型 参数数据］，［整数型变量 线程句柄］） - 多线程支持库->多线程控制
    英文名称：CreateThread
    创建并启动一条线程，可重复使用以创建多条线程，成功返回真，失败返回假。本命令为初级命令。
    参数<1>的名称为“欲执行的子程序”，类型为“子程序指针（SubPtr）”。本参数提供创建线程时欲启动的子程序，根据是否需要传递参数数据，该子程序必须没有或具有一个整数型参数，否则将出错。
    参数<2>的名称为“参数数据”，类型为“整数型（int）”，可以被省略。本参数提供线程被启动时传递到欲启动子程序的整数数据。如果本参数未被省略，此时被启动子程序必须接收一个整数型参数，否则将出错。
    参数<3>的名称为“线程句柄”，类型为“整数型（int）”，可以被省略，提供参数数据时只能提供变量。如果提供了本参数，将向参数变量写入线程句柄（Windows下为HANDLE，Linux下为pthread_t），请在适当的时机关闭该句柄。如果不提供本参数接收线程句柄，内部将自动处理线程句柄。

    操作系统需求： Windows、Linux

smithlau

我看精易模块里面有线程内容，这又该如何用呢