精易论坛

标题: 取出文本与删除文本文本源码【可按字数取左边、取右边、删左边、删右边】 [打印本页]

作者: 墨影0620    时间: 2018-10-23 09:08
标题: 取出文本与删除文本文本源码【可按字数取左边、取右边、删左边、删右边】
我估计这个源码已经没法再简化了。。。


  
子程序名返回值类型公开备 注
取出文本文本型 取出一段文字前面或后面的指定数量的字数,可以区分单双系字节字符。
参数名类 型参考可空数组备 注
原文本文本型
取出的字数整数型可以为负数,负数从后面开始取(如:2取前面两个字,-2取末尾两个字)。不能为零,否则返回空文本。
判断 (取出的字数 > 0)
返回 (到半角 (取文本左边 (到全角 (原文本), 取出的字数 × 2)))
判断 (取出的字数 < 0)
返回 (到半角 (取文本右边 (到全角 (原文本), -取出的字数 × 2)))
返回 (“”)

  

子程序名返回值类型公开备 注
删除文本文本型 删除一段文字前面或者后面指定数量的字数,可以区分单双字节字符。
参数名类 型参考可空数组备 注
原文本文本型
删除的字符数整数型可以为负数,负数从后面开始删除(如:2删除前面两个字,-2删除末尾两个字)。不能为零,否则返回空文本。
变量名类 型静态数组备 注
找到的文本文本型 
判断 (删除的字符数 > 0)
返回 (子文本替换 (原文本, 到半角 (取文本左边 (到全角 (原文本), 删除的字符数 × 2)), , , , ))
判断 (删除的字符数 < 0)
找到的文本 = 到半角 (取文本右边 (到全角 (原文本), -删除的字符数 × 2))
返回 (子文本替换 (原文本, 找到的文本, , 倒找文本 (原文本, 找到的文本, , ), , ))
返回 (“”)


因为实在是太简单了我把左右合成一个了


补充内容 (2018-10-24 20:48):
删除文本那里有一个错误!详见置顶帖纠正!
作者: kike    时间: 2018-10-23 09:43
辛苦了。
作者: 墨影0620    时间: 2018-10-23 10:34
思路是:先把所有的内容转换成全角字符,这样一来数字1234567890和ABCDEFGHIJKLMNOPQRSTUVWXYZ就全部变成2个字节了,这时候取出字数的两倍的字节的内容准没错,不会乱码。完事后再把他们转换会半角字符即可。
作者: 墨影0620    时间: 2018-10-24 20:49
纠正删文本的一个错误。
  

子程序名返回值类型公开备 注
删除文本文本型 删除一段文字前面或者后面指定数量的字数,可以区分单双字节字符。
参数名类 型参考可空数组备 注
原文本文本型
删除的字符数整数型可以为负数,负数从后面开始删除(如:2删除前面两个字,-2删除末尾两个字)。不能为零,否则返回空文本。
变量名类 型静态数组备 注
找到的文本文本型 
判断 (删除的字符数 > 0)
返回 (子文本替换 (原文本, 到半角 (取文本左边 (到全角 (原文本), 删除的字符数 × 2)), , ,1 , ))
判断 (删除的字符数 < 0)
找到的文本 = 到半角 (取文本右边 (到全角 (原文本), -删除的字符数 × 2))
返回 (子文本替换 (原文本, 找到的文本, , 倒找文本 (原文本, 找到的文本, , ), , ))
返回 (“”)

作者: 华浮    时间: 2018-10-25 09:45
给新手一个简单的教程,试验调测。、
作者: 玩导弹的驴    时间: 2018-10-25 10:35
感谢分享,很给力!~
作者: gazingat    时间: 2018-10-26 12:10
辛苦了
作者: a3960382663    时间: 2019-4-28 16:07
retn 0x0000   retn 0x0000  
作者: 我的yyy123    时间: 2024-1-11 14:37
学习一下
作者: 初学者1    时间: 2025-1-29 00:43
真的实现了多列,谢谢分享




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4