易语言怎么写无限循环( 二 )


-------------------------------------ECODE RC-----------------------------------------------
.版本 2
.子程序 _按钮1_被单击
.局部变量 起点, 小数型
.局部变量 步长, 小数型
.局部变量 表格数据, 小数型, , "9,9"
.局部变量 行, 整数型, , , 数组下标
.局部变量 列, 整数型
起点 = 1
步长 = 0.4
.计次循环首 (9, 列)
.变量循环首 (9, 1, -1, 行)
起点 = 起点 + 步长
表格数据 [行] [列] = 起点 - 步长
.变量循环尾 ()
.计次循环尾 ()
.计次循环首 (9, 行)
.计次循环首 (9, 列)
编辑框1.加入文本 (到文本 (表格数据 [行] [列]) + “ ”)
.计次循环尾 ()
编辑框1.加入文本 (#换行符)
.计次循环尾 ()
-------------------------------------------END------------------------------------------
下面的价格也是一样的,可以这子程序中调用上面的代码,不同的是表格数据是计算时间:
起点 = 增减时间 (起点, #日, 步长)
表格数据 [行] [列] = 增减时间 (起点, #日, 步长)

易语言怎么写无限循环

文章插图