|
发表于 2013-7-18 20:24:28
|
显示全部楼层
湖南省湘西土家族苗族自治州
所用:精易模块
[e]
.版本 2
.支持库 EThread
.程序集 窗口程序集1
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.局部变量 返回文本, 文本型
.如果真 (参数一 = 1)
返回文本 = 指针_到文本 (参数二)
信息框 (返回文本, #信息图标, )
.如果真结束
.子程序 _窗口1_创建完毕
.子程序 _按钮1_被单击
启动线程 (&线程子程序, , )
.子程序 线程子程序
.局部变量 返回文本, 文本型
.局部变量 返回指针, 整数型
' 经过一大堆代码的处理
.如果真 (0 = 0)
返回文本 = “我是线程返回的信息”
返回指针 = 取指针地址_文本型 (返回文本)
标签1.调用反馈事件 (1, 返回指针, 真)
[/e]
补充内容 (2013-7-18 20:38):
这挺适合多线程处理的 如果是单线程 可以使用程序集变量 或者 全局变量 更简单些 |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|