Question

易语言 如何实现点击按钮后，每隔一段时间，自动点击该按钮，直到列表框数据为空为止

.版本 2
.支持库 HtmlView
.版本 2
.子程序 _启动窗口_创建完毕

.子程序 _批量_被单击

载入 (窗口4, _启动窗口, 真)

.程序集 窗口程序集6

.子程序 _窗口4_创建完毕

.子程序 _确定_被单击

时钟1.时钟周期 ＝ 1000

.子程序 _时钟1_周期事件
.局部变量 临时文本, 文本型
.局部变量 x, 整数型
.局部变量 循环次数
.局部变量 i
.局部变量 n

载入 (窗口7, , 假)
_启动窗口.列表框1.现行选中项 ＝ 0
临时文本 ＝ _启动窗口.列表框1.取项目文本 (_启动窗口.列表框1.现行选中项)
窗口7.超文本浏览框1.跳转 (“＋ 临时文本 ＋ “”, , )
.计次循环首 (0, i)
_启动窗口.列表框1.加入项目 (到文本 (i), i)
.计次循环尾 ()
x ＝ _启动窗口.列表框1.现行选中项
_启动窗口.列表框1.删除项目 (_启动窗口.列表框1.现行选中项)
_启动窗口.列表框1.现行选中项 ＝ x
.如果真 (_启动窗口.列表框1.现行选中项 ＝ -1)
时钟1.时钟周期 ＝ 0
.如果真结束

.子程序 _取消_被单击

销毁 ()

加了这个咋不能自动运行了呢

.如果真 (列表框1.现行选中项 ＝ -1)
时钟1.时钟周期 ＝ 0

加了这个不能自动运行了，呃

Answer 1

利用时钟调用子程序即可

追问

恩，关键是加了一个代码，不生效啊，很郁闷

追答

什么代码 贴上来看看

追问

放在这个后面
列表框1.现行选中项 ＝ x

.如果真 (列表框1.现行选中项 ＝ -1)
时钟1.时钟周期 ＝ 0

加了这个不能自动运行了，呃

追答

首先，列表框1.现行选中项 ＝ -1就是列表框中没有内容，时钟停止工作，之后的一切自动化也相应的无法执行，在时钟即将执行子程序的时候加入 .版本 2

.如果真 (列表框1.取项目数 () ≠ 0)

.如果真结束

而不是让时钟停止工作

Answer 2

有分加 QQ 吧 404042355