快捷键线程关闭的问题

leitian140

这样写关闭线程 另外一个关闭不了 还是在运行，请问怎么写
按Q启动子程序4，再按E启动子程序1 然后关闭子程序4，我这个关闭不了 还是一直在运行，

  

子程序名	返回值类型	公开	备 注
_标签1_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

如果真 (参数一 ＝ Q键)
选择框2.选中 ＝ 取反 (选择框2.选中)
_选择框2_被单击 ()
如果真 (参数一 ＝ E键)
选择框1.选中 ＝ 取反 (选择框1.选中)
_选择框1_被单击 ()

子程序名	返回值类型	公开	备 注
_选择框1_被单击

判断 (选择框1.选中 ＝ 真)
启动线程 (&子程序1, , 线程句柄)
强制结束线程 (线程句柄)
如果真 (选择框1.选中 ＝ 真)
选择框2.选中 ＝ 假

子程序名	返回值类型	公开	备 注
_选择框2_被单击

判断 (选择框2.选中 ＝ 真)
启动线程 (&子程序4, , 线程句柄)
强制结束线程 (线程句柄)
如果真 (选择框2.选中 ＝ 真)
选择框1.选中 ＝ 假

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 _标签1_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> <br /> .如果真 (参数一 ＝ Q键)<br />     选择框2.选中 ＝ 取反 (选择框2.选中)<br />     _选择框2_被单击 ()<br /> <br /> .如果真结束<br /> .如果真 (参数一 ＝ E键)<br />     选择框1.选中 ＝ 取反 (选择框1.选中)<br />     _选择框1_被单击 ()<br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 _选择框1_被单击<br /> <br /> .判断开始 (选择框1.选中 ＝ 真)<br />     启动线程 (&子程序1, , 线程句柄)<br /> .默认<br />     强制结束线程 (线程句柄)<br /> .判断结束<br /> .如果真 (选择框1.选中 ＝ 真)<br />     选择框2.选中 ＝ 假<br /> .如果真结束<br /> <br /> <br /> .子程序 _选择框2_被单击<br /> <br /> .判断开始 (选择框2.选中 ＝ 真)<br />     启动线程 (&子程序4, , 线程句柄)<br /> .默认<br />     强制结束线程 (线程句柄)<br /> .判断结束<br /> .如果真 (选择框2.选中 ＝ 真)<br />     选择框1.选中 ＝ 假

qcby

你两个线程用一个句柄，新开的线程不就把旧句柄覆盖了。那不就结束新线程了。。多个就再加个变量存句柄

补充内容 (2023-7-5 11:46):
或者在你启动新线程之前 结束掉上一个句柄 再开启新线程

空竹

你用同一个变量存2个线程的句柄？

书写寂伤

再单独创建一个变量单独保存你子程序1和4的句柄

kkk1l

分成2个变量：线程句柄1，线程句柄2