多线程支持库操作例子

.计次循环首 (100, )
进入许可区 (许可证号)
' 在没有退出许可区之前，其他线程是不可能操作“随机数变量的”
随机数变量 ＝ 取随机数 (10, 99)
延时 (延时时间)
' 这里用延时是为了和第二个县城的运算速度有差别。这样更容易出错，就更容易看出许可证的作用。
十位编辑框.内容 ＝ 十位编辑框.内容 ＋ 到文本 (随机数变量) ＋ #换行符
退出许可区 (许可证号)
' 这样其它线程就可以操作“随机数变量”了。
.计次循环尾 ()

本例程作用是在多线程中同时启动2个循环，一个循环取随机数10-99，一个循环取随机数101-199，将两个循环取出的数同时放入一个变量中，在从这个变量中把这个数分别放入到两个编辑框中去，在使用进入许可区之后，不会出现错误。

两个编辑框分别放入10-99和101-199之间的数字，你可以试着去掉进入许可区和退出许可区再运行，你会发现两个编辑框之间数字有错位，这就是两个线程同时使用一个变量产生冲突造成的。