易语言文本排列的代码实例

.版本 2
.程序集 窗口程序集1
.子程序 _排列按钮_被单击
.局部变量 计次
.局部变量 重复文本
重复文本 ＝ 4
顶部编辑框.内容 ＝ 顶部编辑框.内容 ＋ 取重复文本 (7, “ ”) ＋ 取重复文本 (1, “*”) ＋ #换行符
顶部编辑框.内容 ＝ 顶部编辑框.内容 ＋ 取重复文本 (6, “ ”) ＋ 取重复文本 (3, “*”) ＋ #换行符
顶部编辑框.内容 ＝ 顶部编辑框.内容 ＋ 取重复文本 (5, “ ”) ＋ 取重复文本 (5, “*”) ＋ #换行符
顶部编辑框.内容 ＝ 顶部编辑框.内容 ＋ 取重复文本 (4, “ ”) ＋ 取重复文本 (7, “*”) ＋ #换行符
.计次循环首 (重复文本, 计次)
  中部编辑框.内容 ＝ 中部编辑框.内容 ＋ 取重复文本 (重复文本 － 计次, “ ”) ＋ 取重复文本 (10 ＋ 计次 × 2 － 2, “*”) ＋ #换行符
.计次循环尾 ()
.计次循环首 (重复文本, 计次)
  底部编辑框.内容 ＝ 底部编辑框.内容 ＋ 取重复文本 (重复文本 － 计次, “ ”) ＋ 取重复文本 (计次 × 2 － 1, “*”) ＋ #换行符
.计次循环尾 ()
.计次循环首 (3, 计次)
  底部编辑框.内容 ＝ 底部编辑框.内容 ＋ 取重复文本 (计次, “ ”) ＋ 取重复文本 ((重复文本 － 计次) × 2 － 1, “*”) ＋ #换行符
.计次循环尾 ()