多线程注册例子

线程数 ＝ 到整数 (编辑框_线程.内容)
清除数组 (线程句柄)
当前操作 ＝ -1
关闭数 ＝ 0
.计次循环首 (线程数, i)
加入成员 (线程句柄, CreateThread (0, 0, &多线程, i, 0, 0))
.计次循环尾 ()