实例讲解易语言取文本中间自定义子程序

时间:2022-04-19 14:38:42

我们先看下代码:

?
1
2
3
4
5
6
7
8
9
版本 2
 
.子程序 取文本中间内容, 文本型
.参数 完整内容, 文本型
.参数 左边文本, 文本型
.参数 右边文本, 文本型
.局部变量 临时位置, 整数型
.局部变量 总长度, 整数型
.局部变量 返回结果, 文本型

 

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

临时位置 = 寻找文本 (完整内容, 左边文本, , 假) + 取文本长度 (左边文本)

返回结果 = 取文本中间 (完整内容, 临时位置, 总长度)

总长度 = 取文本长度 (返回结果)

临时位置 = 寻找文本 (返回结果, 右边文本, , 假) - 1

返回结果 = 取文本中间 (返回结果, 1, 临时位置)

返回 (返回结果)

大家可以在本地测试下,感谢大家对服务器之家的支持。