Question

易语言 在编辑框的内容自动分割

比如编辑框中的文本是 aaaabbbbcccc
如何让他每隔4个字符中间加一个空格。
就是输入aaaa自动加一个空格。然后bbbb之后自动加一个空格。以此类推。
就成这样的：aaaa bbbb cccc
这个应该怎么写呢？

Answer 1

.版本 2
.子程序 _编辑框1_内容被改变
.局部变量 b, 文本型
.局部变量 a, 文本型

.如果真 (编辑框1.内容 ≠ “”)
b ＝ 删全部空 (编辑框1.内容)
a ＝ 到文本 (到数值 (取文本长度 (b)) ÷ 4)
.如果真 (寻找文本 (a, “.”, , 假) ＝ -1)
编辑框1.加入文本 (“ ”)
.如果真结束

.如果真结束

追问

.子程序 _票头大写1_内容被改变
.局部变量 a, 文本型
.局部变量 b, 文本型

.如果真 (票头大写1.内容 ≠ “”)
b ＝ 删全部空 (票头大写1.内容)
a ＝ 到文本 (到数值 (取文本长度 (b)) ÷ 4)
.如果真 (寻找文本 (a, “.”, , 假) ＝ -1)
票头大写1.加入文本 (“ ”)

中间的空格太多了。。。。

Answer 2

.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 文本组, 文本型, , "0"
.局部变量 文本, 文本型
.局部变量 临时, 文本型
.局部变量 n, 整数型
n ＝ 1
文本 ＝ 编辑框1.内容
.判断循环首 (n ≤ 取文本长度 (文本)) ' 中英文逐字分割
临时 ＝ 取文本中间 (文本, n, 1)
.如果真 (取代码 (临时, ) ＜ 0)
临时 ＝ 取文本中间 (文本, n, 2)
n ＝ n ＋ 1
.如果真结束
加入成员 (文本组, 临时)
n ＝ n ＋ 1
.判断循环尾 ()
文本 ＝ “”
.计次循环首 (取数组成员数 (文本组), n)
.判断开始 (n ％ 4 ＝ 0) ' 隔四个位置加空格
文本 ＝ 文本 ＋ 文本组 [n] ＋ “ ”
.默认
文本 ＝ 文本 ＋ 文本组 [n]
.判断结束
.计次循环尾 ()
文本 ＝ 取文本左边 (文本, 取文本长度 (文本) － 1) ' 去除最后一个空白
调试输出 (文本) ' 文本为所求
' * “aaaa bbbb cccc”