易语言怎样按下按键后进度条滚动满了然后弹出信息框。

不是一进去就滚动,是按下按键后滚动。
2024-10-31 22:15:14
有3个网友回答
网友(1):

这种东西用不着时钟的 一般的循环就可以做到
.版本 2

.子程序 _按钮1_被单击

进度条1.最大位置 = 99
进度条1.最小位置 = 0
进度条1.位置 = 0
.计次循环首 (100, )
进度条1.位置 = 进度条1.位置 + 1
延时 (100)
.计次循环尾 ()
信息框 (“加载完毕”, 0, “系统提示”)

网友(2):

.版本 2

.子程序 __启动窗口_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = 13)
时钟1.时钟周期 = 100
.如果真结束

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

.如果 (进度条1.位置 < 100)
进度条1.位置 = 进度条1.位置 + 1
.否则
时钟1.时钟周期 = 0
信息框 (“时间到!”, 64, “OK”)
运行 (“Notepad.exe”, 假, )
.如果结束

这个程序,你得先按回车,才可以启动时钟,滚动条才会滚动的。

网友(3):

.版本 2
.支持库 spec

.子程序 __启动窗口_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.局部变量 i

.如果真 (键代码 = #B键)
.计次循环首 (100, i)
进度条1.位置 = i
延迟 (10000 ÷ 100) ' 将总共时间平分100份
.计次循环尾 ()
信息框 (“OK!”, #信息图标, )
.如果真结束