Question

用易语言写的自动递增递减问题

.版本 2
.程序集 窗口程序集1
.程序集变量 N, 整数型
.子程序 _时钟1_周期事件
编辑框1.内容 ＝ 到文本 (N)
.如果 (N ＜ 50)
N ＝ N ＋ 1
.否则
.如果结束
.' 如果 (N ＞ 0)
' N ＝ N － 1
.否则
.如果结束
' 我的目的是刚开始时，让变量N+1，当N等于50是N开始递减，当减到0时有开始递增。一直循环效果如下
' 1,2,3,4，。。。。。50.，49,48,47.。。。。。0.。1.，2,3，。。。
我可以用判断循环实现，但CPU使用太大

Answer 1

.版本 2
.程序集 窗口程序集1.程序集变量 N, 整数型
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 ＝ 500
.子程序 _时钟1_周期事件
N ＝ N ＋ 1
编辑框1.内容 ＝ 到文本 (N)
.如果真 (N ＝ 50)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 500
.如果真结束

.子程序 _时钟2_周期事件
N ＝ N － 1
编辑框1.内容 ＝ 到文本 (N)
.如果真 (N ＝ 0)
时钟1.时钟周期 ＝ 500
时钟2.时钟周期 ＝ 0
.如果真结束

Answer 2

可以增加在逻辑变量来判断增加或减少。

代码如下：

版本。装配窗口设置为1

。的装配变量N整数

。装配可变开关改变逻辑

。子程序__启动窗口_创建

增加或减少开关= TRUE。子程序_时钟1_周期事件

。

（开关）的变化。 （N <50）

N = N + 1

或增加或减少开关= FALSE

如果最终

。否则

（N> 0）

N = N -

或

增加或减少开关= TRUE

如果结束如果结束编辑框中
1 =文本（N）

Answer 3

可加到线程里操作
启动线程（&子程序）

Answer 4

加个处理事件

Answer 5

用判断循环