多线程的判断脚本

zjjsyhliyu

新手贴段源码 方便大家学习多线程的使用方法  如有错请帮忙校正 方法是比较a和b的大小来判断 开启的是哪个线程

空间 我的程序
整型 线程1
整型 线程2
整型 线程句柄
字符型 输入a的值
字符型 输入b的值
整型 a
整型 b

功能 整型 线程1()
辅助.消息框("这是线程1")
返回 0
功能结束

功能 整型 线程2()
辅助.消息框("这是线程2")
返回 0
功能结束

功能 逻辑型 开始_点击()  
//这里添加你要执行的代码,这里是你点击开始按钮执行的代码
输入a的值=编辑框.获得文本("编辑框0")
输入b的值=编辑框.获得文本("编辑框1")
a=转换.字符型转整型(输入a的值)
b=转换.字符型转整型(输入b的值)
//当a>b时 开启线程1
如果(a>b)线程句柄=线程.开启("我的程序.线程1")
否则//当a<b时 开启线程2
如果(b>a)线程句柄=线程.开启("我的程序.线程2")
否则//a和b相等时 我们就让他弹出消息框“数值相同”好了
辅助.消息框("数值相同")
如果结束
如果结束
返回 真  
//函数返回语句   
功能结束  

功能 逻辑型 退出_点击()  
//这里是你退出的时候要执行的代码,这类是你点击退出按钮执行的代码
线程.关闭(线程句柄)
辅助.消息框("线程关闭 ，脚本结束")
辅助.退出()
返回 真  
//函数返回语句   
功能结束  

空间结束     
//命名空间结束语句     

TC管理员

不错,支持下  :D

zjjsyhliyu

:-D多谢支持

章昊

:*相当犀利

zjjsyhliyu

回复 2楼小东的帖子

附件穿不上来怎么办  超出大小

TC管理员

回复 2楼小东的帖子

附件穿不上来怎么办  超出大小
zjjsyhliyu 发表于 2011-9-3 16:17:20

权限不够吧！ 努力回帖,发帖。  很快就可以了的。。

zjjsyhliyu

回复 6楼小东的帖子

但是这个脚本我对页面进行了设计 直接复制源码会出错

lilo

:strong:不错哦!

迩比可比克

留迹   非水

我菜菜

很犀利啊，学习学习