文本_按字数分割

haoren1212

  

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

变量名	类 型	静态	数组	备 注
测试	文本型		0

文本_按字数分割 (编辑框1.内容, 到整数 (编辑框2.内容), 测试)
调试输出 (测试)

子程序名	返回值类型	公开	备 注
文本_按字数分割
参数名	类 型	参考	可空	数组	备 注
文本	文本型				参数名称为“文本”，数据类型为“文本型”，所处语句为“文本_按字数分割”。注明：需要分割的文本。
字数	整数型				参数名称为“字数”，数据类型为“整数型”，所处语句为“文本_按字数分割”。注明：按字数进行分割。
返回的数组	文本型				参数名称为“返回的数组”，数据类型为“文本型（text）”，所处语句为“文本_按字数分割”。注明：保存分割结果的数组变量。

变量名	类 型	静态	数组	备 注
文本数组	文本型		0
n	整数型
i	整数型
临时文本	文本型

文本_逐字分割 (文本, 文本数组)
变量循环首 (0, 取数组成员数 (文本数组), 字数, n)
计次循环首 (字数, i)
如果真 (n ＋ i ＞ 取数组成员数 (文本数组))
跳出循环 ()
临时文本 ＝ 临时文本 ＋ 文本数组 [n ＋ i]
计次循环尾 ()
加入成员 (返回的数组, 临时文本)
临时文本 ＝ “”
变量循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 测试, 文本型, , "0"<br /> <br /> 文本_按字数分割 (编辑框1.内容, 到整数 (编辑框2.内容), 测试)<br /> 调试输出 (测试)<br /> <br /> .子程序 文本_按字数分割<br /> .参数 文本, 文本型, , 参数名称为“文本”，数据类型为“文本型”，所处语句为“文本_按字数分割”。注明：需要分割的文本。<br /> .参数 字数, 整数型, , 参数名称为“字数”，数据类型为“整数型”，所处语句为“文本_按字数分割”。注明：按字数进行分割。<br /> .参数 返回的数组, 文本型, 参考 数组, 参数名称为“返回的数组”，数据类型为“文本型（text）”，所处语句为“文本_按字数分割”。注明：保存分割结果的数组变量。<br /> .局部变量 文本数组, 文本型, , "0",  <br /> .局部变量 n, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 临时文本, 文本型<br /> <br /> 文本_逐字分割 (文本, 文本数组)<br /> .变量循环首 (0, 取数组成员数 (文本数组), 字数, n)<br />     .计次循环首 (字数, i)<br />         .如果真 (n ＋ i ＞ 取数组成员数 (文本数组))<br />             跳出循环 ()<br />         .如果真结束<br />         临时文本 ＝ 临时文本 ＋ 文本数组 [n ＋ i]<br />     .计次循环尾 ()<br />     加入成员 (返回的数组, 临时文本)<br />     临时文本 ＝ “”<br /> .变量循环尾 ()

haoren1212

加入成员时，注意加个判断临时文本不等于空

小白也疯狂

有个叫重定义数组的跟数组合并的命令,三个命令就能搞定了

我的yyy123

比这个 文本_逐字分割（）的优势在哪

haoren1212

Suky 发表于 2024-10-23 07:08

求助贴结贴了，留个贴方便后来者

Suky