Question

易语言如何在每个文字后面添加一个文字？

在编辑框1输入一段文字后，单击按钮1自动为每个字后面加个感叹号。
假如我在编辑框1输入“易语言，123百度”
单击按钮1后编辑框1的内容就变成“易！语！言！，！1！2！3！百！度！”。
每个字符后面都加一个感叹号！

Answer 1

这主要用按钮功能实现，在按钮里用个循环语句，先取编辑框1的各个文字，如取出“易”后，用一个文本变量保存值为“易”+“！”，这个变量可以累加，就象计算1+2+3+4....的结果算法一样。 最后再加一句，编辑框1的内容等于那个保存值的文本变量就OK。这就是思路。

追问

能给个源码吗？

Answer 2

.版本 2.支持库 spec
.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 文本长度, 整数型
.局部变量 文本数组, 文本型, , "0"
.局部变量 文本1, 文本型
.局部变量 计次
.局部变量 是否, 逻辑型
.局部变量 结果, 文本型

文本 ＝ 到全角 (编辑框1.内容)
文本长度 ＝ 取文本长度 (文本)
是否 ＝ 假
.判断循环首 (是否 ≠ 真)
文本1 ＝ 取文本左边 (文本, 2)
结果 ＝ 结果 ＋ 文本1 ＋ “！”

文本 ＝ 文本替换 (文本, 1, 2, )
.如果真 (删尾空 (到半角 (文本)) ＝ “”)
是否 ＝ 真
.如果真结束

.判断循环尾 ()
调试输出 (结果)
编辑框1.内容 ＝ 结果

Answer 3

这个很容易，用文本替换，然后编辑框的内容等于替换的内容