易语言怎么把一段话分成像阶梯一样的

易语言怎么把一段话分成像阶梯一样的

.程序集 窗口程序集1
.程序集变量 计次, 整数型
.程序集变量 计数, 整数型
.程序集变量 文本, 文本型, , "0"

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

编辑框1.是否允许多行 ＝ 真
编辑框2.是否允许多行 ＝ 真

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

文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.计次循环首 (取文本长度 (文本 [计次]) ÷ 2, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.计次循环尾 ()
.计次循环尾 ()

.子程序 _按钮2_被单击, , , 倒阶梯

文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.变量循环首 (取文本长度 (文本 [计次]) ÷ 2, 1, -1, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.变量循环尾 ()
.计次循环尾 ()

版本 2
代码如下：
.程序集 窗口程序集1
.程序集变量 计次, 整数型
.程序集变量 计数, 整数型
.程序集变量 文本, 文本型, , "0"
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 ＝ 真
编辑框2.是否允许多行 ＝ 真
.子程序 _按钮1_被单击
文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.计次循环首 (取文本长度 (文本 [计次]) ÷ 2, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.计次循环尾 ()
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 倒阶梯
文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.变量循环首 (取文本长度 (文本 [计次]) ÷ 2, 1, -1, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.变量循环尾 ()
.计次循环尾 ()
注：用超级编辑框编写
超级编辑框2.内容 ＝ 超级编辑框2.内容 ＋ 取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符

.版本 2
.程序集 窗口程序集1
.程序集变量 计次, 整数型
.程序集变量 计数, 整数型
.程序集变量 文本, 文本型, , "0"
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 ＝ 真
编辑框2.是否允许多行 ＝ 真
.子程序 _按钮1_被单击
文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.计次循环首 (取文本长度 (文本 [计次]) ÷ 2, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.计次循环尾 ()
.计次循环尾 ()
.子程序 _按钮2_被单击, , , 倒阶梯
文本 ＝ 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 ＝ “”
.计次循环首 (取数组成员数 (文本), 计次)
文本 [计次] ＝ 到全角 (文本 [计次])
.变量循环首 (取文本长度 (文本 [计次]) ÷ 2, 1, -1, 计数)
编辑框2.加入文本 (取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符)
.变量循环尾 ()
.计次循环尾 ()追问我写超级编辑框.加入文本 读不出来 没有这个变量 为什么呢追答用编辑框就行了,因为超级编辑框没有"加入文本"命令.如用超级编辑框,要这样写:
超级编辑框2.内容 ＝ 超级编辑框2.内容 ＋ 取文本左边 (文本 [计次], 计数 × 2) ＋ “_” ＋ #换行符