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

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

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

能给个源码吗?

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

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

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

.判断循环尾 ()
调试输出 (结果)
编辑框1.内容 = 结果本回答被提问者采纳
第3个回答  2013-02-25
这个很容易,用文本替换,然后编辑框的内容等于替换的内容
相似回答