Question

如何用易语言实现合并2个文本内容，并且可以在合并中间添加想添加的东西

.版本 2

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 编1, 文本型, , "0"
.局部变量 编2, 文本型, , "0"
.局部变量 a, 整数型
.局部变量 b, 整数型
.局部变量 s, 整数型
.局部变量 计次, 整数型
.局部变量 编3, 文本型

编1 ＝ 分割文本 (编辑框1.内容, #换行符, )
编2 ＝ 分割文本 (编辑框2.内容, #换行符, )
.判断开始 (取数组成员数 (编1) ＞ 取数组成员数 (编2))
s ＝ 取数组成员数 (编1) － 取数组成员数 (编2)
.计次循环首 (s, 计次)
加入成员 (编2, “”)
.计次循环尾 ()
.默认
s ＝ 取数组成员数 (编2) － 取数组成员数 (编1)
.计次循环首 (s, 计次)
加入成员 (编1, “”)
.计次循环尾 ()

.判断结束
.计次循环首 (取数组成员数 (编1), a)
编3 ＝ + 编3 ＋ 编1 [a] ＋ 编2 [a] ＋ #换行符
.计次循环尾 ()
编辑框3.内容 ＝ 编3

.子程序 __启动窗口_创建完毕

以上是我的代码 只实现了合并2个文件 没有实现加在中间的 求大神





Answer 1

出错在_按钮1_被单击的

.计次循环首 (取数组成员数 (编1), a)

    编3 ＝  + 编3 ＋ 编1 [a] ＋ 编2 [a] ＋ #换行符

.计次循环尾 ()

简单的输出调试文本,发现

编1=编辑框1

编2=编辑框2

编辑框3等于的是两个合起来，是正确的，但是没有加入编辑框4的文本

所以修改为

编1 [a] ＋ 编辑框4.内容 ＋ 编2 [a] ＋ #换行符

修正代码:

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击

.局部变量 编1, 文本型, , "0"

.局部变量 编2, 文本型, , "0"

.局部变量 a, 整数型

.局部变量 b, 整数型

.局部变量 s, 整数型

.局部变量 计次, 整数型

.局部变量 编3, 文本型

编1 ＝ 分割文本 (编辑框1.内容, #换行符, )

编2 ＝ 分割文本 (编辑框2.内容, #换行符, )

.判断开始 (取数组成员数 (编1) ＞ 取数组成员数 (编2))

    s ＝ 取数组成员数 (编1) － 取数组成员数 (编2)

    .计次循环首 (s, 计次)

        加入成员 (编2, “”)

    .计次循环尾 ()

.默认

    s ＝ 取数组成员数 (编2) － 取数组成员数 (编1)

    .计次循环首 (s, 计次)

        加入成员 (编1, “”)

    .计次循环尾 ()

.判断结束

.计次循环首 (取数组成员数 (编1), a)

    编辑框3.加入文本 (编1 [a] ＋ 编辑框4.内容 ＋ 编2 [a] ＋ #换行符)

.计次循环尾 ()