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

2024-12-29 10:36:09
推荐回答(2个)
回答1:

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

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

.如果真结束

回答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”