|
发表于 2018-5-8 20:55:22
|
显示全部楼层
陕西省西安市
.版本 2
.支持库 iext
.支持库 EThread
.程序集 窗口程序集_启动窗口
.子程序 计算
.参数 索引, 整数型
.局部变量 加数, 整数型
.局部变量 被加数, 整数型
.局部变量 和, 整数型
置随机数种子 ()
加数 = 取随机数 (100, 1000)
被加数 = 取随机数 (100, 1000)
和 = 加数 + 被加数
超级列表框1.置标题 (索引, 0, 到文本 (加数))
超级列表框1.置标题 (索引, 1, 到文本 (被加数))
超级列表框1.置标题 (索引, 2, 到文本 (和))
.子程序 _按钮1_被单击
.计次循环首 (10, )
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 1
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 2
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 3
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 4
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 5
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 6
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 7
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 8
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 9
启动线程 (&计算, 超级列表框1.插入表项 (, , , , , ), ) ' 10
.计次循环尾 ()
信息框 (“本次计算:” + 到文本 (超级列表框1.取表项数 ()) + “条”, #信息图标, , )
这是他的代码。。你们别下载浪费金币了。。。 |
|