对比取相同

seed如影

两个编辑框对比 吧相同的提取出来 用到的是文本操作方面的命令

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
计次	整数型
文本组	文本型		0
计次2	整数型
文本组2	文本型		0

编辑框3.内容 ＝ “”
文本组 ＝ 分割文本 (编辑框1.内容, #换行符, )
文本组2 ＝ 分割文本 (编辑框2.内容, #换行符, )
计次循环首 (取数组成员数 (文本组), 计次)
计次循环首 (取数组成员数 (文本组2), 计次2)
如果真 (寻找文本 (文本组 [计次], 文本组2 [计次2], , 假) ≠ -1)
编辑框3.加入文本 (文本组 [计次] ＋ #换行符 )

计次循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 计次, 整数型<br /> .局部变量 文本组, 文本型, , "0"<br /> .局部变量 计次2, 整数型<br /> .局部变量 文本组2, 文本型, , "0"<br /> <br /> 编辑框3.内容 ＝ “”<br /> 文本组 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 文本组2 ＝ 分割文本 (编辑框2.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (文本组), 计次)<br />     .计次循环首 (取数组成员数 (文本组2), 计次2)<br />         .如果真 (寻找文本 (文本组 [计次], 文本组2 [计次2], , 假) ≠ -1)<br />             编辑框3.加入文本 (文本组 [计次] ＋ #换行符)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()

wxhscc

谢谢分享，正好需要

seed如影

菜菜瓜 发表于 2020-2-18 18:35
对比取相同

看到你的回复 很高兴 感谢你的支持

菜菜瓜

对比取相同

杨明煜

真的感谢.................

seed如影

xiaowukeji 发表于 2020-2-16 11:09
这个思路不错  学习了

感谢你的回复 谢谢支持

xiaowukeji

这个思路不错  学习了

smy555

支持支持 多谢开源

seed如影

本人是资格最老的菜鸟 不接受任何反驳 谢谢

我翔飞

支持一下，谢谢分享