刚才没有看清楚在发一次

z692435632

刚才有个大佬写的这个，

分了10份文本.txt.6789 10全部是空文本，里面没有内容，

12345文本顺序不正确，

我的意思是，一个文本里面有10个号，怎么一键分配10个文本.txt

每个文本里面1个号，

我要是有100个号，每个文本就是10个号。以此类推，

寒潮

不好意思，变量用错了。
Demo.e (4.12 KB, 下载次数: 0)

2020-9-4 15:11 上传

点击文件名下载附件

狐狸黑斯

分割文本 都一个数组里 再循环 写出

z692435632

  

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

变量名	类 型	静态	数组	备 注
局_文件内容	文本型
局_文件数组	文本型		0
局_分割份数	整数型
局_每份行数	双精度小数型
局_份数计次	整数型
局_行数计次	整数型
局_输出内容	文本型

局_文件内容 ＝ 到文本 (读入文件 (“新号.txt”))
局_文件数组 ＝ 分割文本 (局_文件内容, #换行符, )
局_分割份数 ＝ 10
如果 (取数组成员数 (局_文件数组) ％ 局_分割份数 ＝ 0)
局_每份行数 ＝ 取数组成员数 (局_文件数组) ＼ 局_分割份数
局_每份行数 ＝ 取数组成员数 (局_文件数组) ＼ 局_分割份数 ＋ 1
计次循环首 (局_分割份数, 局_份数计次)
局_输出内容 ＝ “”
计次循环首 (局_每份行数, 局_行数计次)
如果真 (局_份数计次 × 局_分割份数 － 局_分割份数 ＋ 局_行数计次 ≤ 取数组成员数 (局_文件数组))
如果真 (局_输出内容 ≠ “”)
局_输出内容 ＝ 局_输出内容 ＋ #换行符
局_输出内容 ＝ 局_输出内容 ＋ 局_文件数组 [局_份数计次 × 局_分割份数 － 局_分割份数 ＋ 局_行数计次]
调试输出 (局_输出内容)
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\” ＋ 到文本 (局_份数计次) ＋ “.txt”, 到字节集 (局_输出内容))
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局_文件内容, 文本型<br /> .局部变量 局_文件数组, 文本型, , "0"<br /> .局部变量 局_分割份数, 整数型<br /> .局部变量 局_每份行数, 双精度小数型<br /> .局部变量 局_份数计次, 整数型<br /> .局部变量 局_行数计次, 整数型<br /> .局部变量 局_输出内容, 文本型<br /> <br /> 局_文件内容 ＝ 到文本 (读入文件 (“新号.txt”))<br /> 局_文件数组 ＝ 分割文本 (局_文件内容, #换行符, )<br /> 局_分割份数 ＝ 10<br /> .如果 (取数组成员数 (局_文件数组) ％ 局_分割份数 ＝ 0)<br />     局_每份行数 ＝ 取数组成员数 (局_文件数组) ＼ 局_分割份数<br /> .否则<br />     局_每份行数 ＝ 取数组成员数 (局_文件数组) ＼ 局_分割份数 ＋ 1<br /> .如果结束<br /> .计次循环首 (局_分割份数, 局_份数计次)<br />     局_输出内容 ＝ “”<br />     .计次循环首 (局_每份行数, 局_行数计次)<br />         .如果真 (局_份数计次 × 局_分割份数 － 局_分割份数 ＋ 局_行数计次 ≤ 取数组成员数 (局_文件数组))<br />             .如果真 (局_输出内容 ≠ “”)<br />                 局_输出内容 ＝ 局_输出内容 ＋ #换行符<br />             .如果真结束<br />             局_输出内容 ＝ 局_输出内容 ＋ 局_文件数组 [局_份数计次 × 局_分割份数 － 局_分割份数 ＋ 局_行数计次]<br />         .如果真结束<br />         调试输出 (局_输出内容)<br />     .计次循环尾 ()<br />     写到文件 (取运行目录 () ＋ “\” ＋ 到文本 (局_份数计次) ＋ “.txt”, 到字节集 (局_输出内容))<br /> <br /> <br /> .计次循环尾 ()

z692435632

z692435632 发表于 2020-9-4 15:01
[e=3].版本 2
.支持库 spec

帮忙修改一下