发布网友 发布时间:2023-12-20 12:53
共1个回答
热心网友 时间:2024-01-16 21:39
终于调试完毕了
.版本 2
.支持库 EThread
.子程序 __启动窗口_创建完毕
启动线程 (&进度条动起来了, , )
.子程序 进度条动起来了
.局部变量 变量, 整数型
.判断循环首 (变量 = 变量)
.如果 (进度条1.标记 = “”)
进度条1.位置 = 进度条1.位置 + 20
.如果真 (进度条1.位置 = 100)
进度条1.标记 = “1”
信息框 (“ ”, 0, “ ”) ' 退到最左边触发编辑框
进度条1.位置 = 0 ' 清零
.如果真结束
.否则
进度条1.位置 = 进度条1.位置 - 20
.如果真 (进度条1.位置 = 0)
.如果真结束
.如果结束
延时 (1000)
.判断循环尾 ()
请采纳满意回答