易语言2个文本, 取重复过的文本

2025-03-04 11:52:24
推荐回答(1个)
回答1:

.版本 2
.子程序 _按钮1_被单击
.局部变量 文本1, 文本型, , "0"
.局部变量 文本2, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 n1, 整数型
.局部变量 重复文本, 文本型
文本1 = 分割文本 (编辑框1.内容, #换行符, )
文本2 = 分割文本 (编辑框2.内容, #换行符, )
.计次循环首 (取数组成员数 (文本1), n)
.计次循环首 (取数组成员数 (文本2), n1)
.判断开始 (文本1 [n] = 文本2 [n1])
重复文本 = 重复文本 + 文本2 [n1] + #换行符
跳出循环 ()
.默认
.判断结束
.计次循环尾 ()
.计次循环尾 ()
编辑框3.内容 = 重复文本