易语言如何按行取文本引号中间的内容？

Question

编辑框1是原文本内容（例如：第一行、是看能否很少发生"术后是是从屏幕上看看" 第二行、哦好的飞机首飞看法和思考"的那些的经历顶级美女"）。按一下按钮开始从文本的第一行开始搜索，如果遇到引号就取出它的内容到编辑框2（注：可能一行内有多组引号），如果该行中没有引号则继续往下一行搜索，直到找到有引号的行。编辑框2的内容可以随意修改，修改完后按一下就会把修改后的内容替换成编辑框1原来该行的内容

Answer 1

.版本 2

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 内容, 文本型

内容 ＝ “〈12345679例子〉”
编辑框1.内容 ＝ 取指定内容 (内容, “〈”, “〉”)

.子程序 取指定内容, 文本型, , 取出想要的内容
.参数 完整内容, 文本型
.参数 左边文本, 文本型, , 取出想要的内容段的左边
.参数 右边文本, 文本型, , 取出想要的内容段的右边
.局部变量 临时位置, 整数型
.局部变量 总长度, 整数型
.局部变量 临时文本, 文本型

总长度 ＝ 取文本长度 (完整内容)
临时位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)
临时文本 ＝ 取文本中间 (完整内容, 临时位置, 总长度)
总长度 ＝ 取文本长度 (临时文本)
临时位置 ＝ 寻找文本 (临时文本, 右边文本, , 假) － 1
临时文本 ＝ 取文本中间 (临时文本, 1, 临时位置)
返回 (临时文本)