小白求指教,易语言导入文本分隔

l1334733933

如上图，
怎样在编辑框1.输入“发出去的信”
点击按钮
编辑框2显示-后面的“收不回了”
这只是个例子，像这样格式的文本有上百条

十万个为什么

参考一下，思路是先把所有文本读入到变量里。然后分隔成一行一行的。然后在每行里寻找编辑框1的问题。如果有这个问题。那么在这行的-号后面寻找答案，

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

变量名	类 型	静态	数组	备 注
内容	文本型
分隔后	文本型		0
计次	整数型

内容 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\新建文本文档.txt”))
调试输出 (内容)
分隔后 ＝ 分割文本 (内容, #换行符, )
计次循环首 (取数组成员数 (分隔后), 计次)
调试输出 (分隔后 [1], 分隔后 [2])
如果真 (寻找文本 (分隔后 [计次], 编辑框1.内容, , 假) ≠ -1)  ' 寻找编辑框1内容。找到的话不等-1.
编辑框2.内容 ＝ 文本_取右边 (分隔后 [计次], “-”, , )

计次循环尾 ()

子程序名	返回值类型	公开	备 注
文本_取右边	文本型	√	从文本的右边按 欲寻找的文本 开始寻找, 取行右边 (“1234567890”, “5”, 1, 真)
参数名	类 型	参考	可空	数组	备 注
被查找的文本	文本型				被查找的文本
欲寻找的文本	文本型				欲寻找的文本
起始寻找位置	整数型		√		欲寻找的文本的起始寻找位置,一般情况都留空
是否区分大小写	逻辑型		√		默认为假,区分大小写

变量名	类 型	静态	数组	备 注
找到的位置	整数型
结果文本	文本型

如果真 (起始寻找位置 ≤ 0 或 是否为空 (起始寻找位置) ＝ 真)
起始寻找位置 ＝ 1
找到的位置 ＝ 倒找文本 (被查找的文本, 欲寻找的文本, , 是否区分大小写)
如果真 (找到的位置 ＝ -1)
返回 (“”)
结果文本 ＝ 取文本右边 (被查找的文本, 取文本长度 (被查找的文本) － 取文本长度 (欲寻找的文本) － 找到的位置 ＋ 1)
返回 (结果文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 内容, 文本型<br /> .局部变量 分隔后, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> <br /> 内容 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\新建文本文档.txt”))<br /> 调试输出 (内容)<br /> <br /> 分隔后 ＝ 分割文本 (内容, #换行符, )<br /> .计次循环首 (取数组成员数 (分隔后), 计次)<br /> <br /> <br />     调试输出 (分隔后 [1], 分隔后 [2])<br /> <br />     .如果真 (寻找文本 (分隔后 [计次], 编辑框1.内容, , 假) ≠ -1)  ' 寻找编辑框1内容。找到的话不等-1.<br /> <br /> <br />         编辑框2.内容 ＝ 文本_取右边 (分隔后 [计次], “-”, , )<br /> <br /> <br /> <br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> .子程序 文本_取右边, 文本型, 公开, 从文本的右边按 欲寻找的文本 开始寻找, 取行右边 (“1234567890”, “5”, 1, 真)<br /> .参数 被查找的文本, 文本型, , 被查找的文本<br /> .参数 欲寻找的文本, 文本型, , 欲寻找的文本<br /> .参数 起始寻找位置, 整数型, 可空, 欲寻找的文本的起始寻找位置,一般情况都留空<br /> .参数 是否区分大小写, 逻辑型, 可空, 默认为假,区分大小写<br /> .局部变量 找到的位置, 整数型<br /> .局部变量 结果文本, 文本型<br /> <br /> .如果真 (起始寻找位置 ≤ 0 或 是否为空 (起始寻找位置) ＝ 真)<br />     起始寻找位置 ＝ 1<br /> .如果真结束<br /> 找到的位置 ＝ 倒找文本 (被查找的文本, 欲寻找的文本, , 是否区分大小写)<br /> .如果真 (找到的位置 ＝ -1)<br />     返回 (“”)<br /> .如果真结束<br /> 结果文本 ＝ 取文本右边 (被查找的文本, 取文本长度 (被查找的文本) － 取文本长度 (欲寻找的文本) － 找到的位置 ＋ 1)<br /> 返回 (结果文本)

l1334733933

如上图，
怎样在编辑框1.输入“发出去的信”
点击按钮
编辑框2显示-后面的“收不回了”
这只是个例子，像这样格式的文本有上百条
这种问题对于大佬应该不值一提吧
烦请大佬解答一下

yyz860723

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！