Question

我有个一个文本一共是5000行，我想分割每个文件100行。

我有个一个文本一共是5000行，我想分割每个文件100行。
但是用我的代码只能分割出第一部分的100行 后面的就分割不出来了。帮忙看看

.版本 2
.支持库 Krnlnex
.支持库 ChongYong

.程序集 窗口程序集1
.程序集变量 文本数组, 文本型, , "0"
.程序集变量 文件名, 文本型
.程序集变量 时间, 整数型

.子程序 子程序1

.子程序 __启动窗口_创建完毕

.' 如果 (通用对话框1.打开 () ＝ 真)
' 文件名 ＝ 通用对话框1.文件名
.否则
' 返回 ()
.如果结束

' 调试输出 (文件名)

编辑框1.加入文本 (到文本 (读入文件 (“b.txt”)))

文本数组 ＝ 分割文本 (编辑框1.内容, #换行符, )

.子程序 _按钮1_被单击

文本数组 ＝ 分割文本 (编辑框1.内容, #换行符, )
调试输出 (取数组成员数 (文本数组))

信息框 (“共有” ＋ 到文本 (取数组成员数 (文本数组)) ＋ “行” ＋ #换行符 ＋ “用时：” ＋ 到文本 (取启动时间 () － 时间) ＋ “ 毫秒”, 64, )

.子程序 _按钮2_被单击
.局部变量 n, 整数型
.局部变量 数组, 文本型, , "0"
.局部变量 文件名1, 文本型
.局部变量 文件名2, 文本型
.局部变量 文件名3, 文本型
.局部变量 内容, 文本型

.如果真 (编辑框3.内容 ＝ “”)
新信息框 (“分隔行数不能为空！！！”, , “提示”, )
返回 ()

.如果真结束
.计次循环首 (到整数 (编辑框3.内容), n)
编辑框2.加入文本 (文本数组 [n] ＋ #换行符)
文件名1 ＝ 文本数组 [1]
文件名2 ＝ 文本数组 [到整数 (编辑框3.内容)]
文件名3 ＝ 文件名1 ＋ “-----” ＋ 文件名2 ＋ “手机号码展示”
写到文件 (“C:\Documents and Settings\Administrator\桌面\” ＋ 文件名3 ＋ “.txt”, 到字节集 (编辑框2.内容))

.计次循环尾 ()

这是我的代码 帮忙看看哪里需要修改

Answer 1

傻蛋，这都不会，你玩蛋去吧。

Answer 2

用shell一个命令就搞完了。split

Answer 3

我表示我只看得懂C和JAVA