易语言UPX进度条问题

易语言UPX进度条问题,第1张

给你一个完整的代码:

.版本 2

.程序集 窗口程序集1

.程序集变量 NN, 整数型

.子程序 __启动窗口_创建完毕

NN = 0

时钟1.时钟周期 = 100

标签1.标题 = “正在加载组件(0/5)”

.子程序 _时孝搭乱钟1_周期事件

进度条1.位置 = 进度条1.位置 + 1

.如果真 (进度条1.位置 = 100)

.如果 (NN < 5)

NN = NN + 1

标签1.标题 = “正在加载组件(” + 到文本 (NN) + “/5)”

.否则

时钟1.时钟周期 = 0

返回 ()

.如果结束

进度条1.位置 = 0

.如果真结束

.版本 2

.程序集 窗口程序集1

.程序集变量 NN, 整数型

.子程序 __启动窗口_创建完毕

NN = 0

时钟1.时钟周期 = 100

标签1.标题 = “正在加载组件(0/5)”

.子程序 _时钟1_周期事件

进度条1.位置 = 进度枝陪条1.位置 + 1

.如果真 (进度条1.位置 = 100)

.如果 (NN < 5)

NN = NN +巧档 1

标签1.标题 = “正在加载组件(” + 到文本 (NN) + “/5)”

.否则

时钟1.时钟周期 = 0

返回 ()

.如果结束

进度条1.位置 = 0

.如果真结束

你可野笑斗以这么做:

.版本 2

.程序集 窗口程序集1

.程序集变量 数组_编辑框, 编辑框, , "5"

.子程序 __启动窗口_创建完毕

.局部变量 NN, 整数型

.计次循环首 (5, NN)

数组_编辑框 [NN] = 多项选择 (NN, 编辑框1, 编辑框2, 编辑框3, 编辑框4, 编辑颂磨框5)

.计次循环尾 ()

现在数组一般不使用{}来赋值了。

象你的程序这样的,可以考虑使用标记来 *** 作升运。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12498803.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-25
下一篇 2023-05-25

发表评论

登录后才能评论

评论列表(0条)

保存