（易语言）取文本中间内容源码

.版本 2

.子程序 取指定内容, 文本型, , 取指定的文本内容

.参数 完整内容, 文本型

.参数 左边文本, 文本型

.参数 右边文本, 文本型

.局部变量 位置, 整数型

.局部变量 总长度, 整数型

.局部变量 文本, 文本型

总长度 ＝ 取文本长度 (完整内容)

位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)

文本 ＝ 取文本中间 (完整内容, 位置, 总长度)

总长度 ＝ 取文本长度 (文本)

位置 ＝ 寻找文本 (文本, 右边文本, , 假) － 1

文本 ＝ 取文本中间 (文本, 1, 位置)

返回 (文本)