简单文本处理的问题-在线等

有梦就追

请教大神怎么样吧 3个或者多个不同的文件夹里面的文本，随机组成多个文本 保存在新的文件夹里面   

走一回

这个5精币太少了。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_路径	文本型

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

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

文件_枚举EX (取运行目录 () ＋ “\目标文件夹”, “*.txt”, 真, &回调函数)
集_路径 ＝ “”
t ＝ 分割文本 (集_路径, “#”, )
子程序_随机 (t)
' 接下来，就是探险顺序读取文件的内容，组合一下，不用再随机的了，因为文件名就是随机好的
' 读取的数量在  取随机数(1,取数组成员数(t))  之间

子程序名	返回值类型	公开	备 注
回调函数
参数名	类 型	参考	可空	数组	备 注
文件名	文本型
文件路径	文本型

集_路径 ＝ 集_路径 ＋ 文件路径 ＋ “#”

子程序名	返回值类型	公开	备 注
子程序_随机
参数名	类 型	参考	可空	数组	备 注
参_数组	文本型

变量名	类 型	静态	数组	备 注
i	整数型
n	整数型
t	文本型
循环次数	整数型

循环次数 ＝ 取数组成员数 (参_数组)
计次循环首 (循环次数, i)
置随机数种子 ()
n ＝ 取随机数 (1, 循环次数)
t ＝ 参_数组 [n]
参_数组 [n] ＝ 参_数组 [i]
参_数组 [i] ＝ t
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_路径, 文本型<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 t, 文本型, , "0"<br /> <br /> 文件_枚举EX (取运行目录 () ＋ “\目标文件夹”, “*.txt”, 真, &回调函数)<br /> 集_路径 ＝ “”<br /> t ＝ 分割文本 (集_路径, “#”, )<br /> 子程序_随机 (t)<br /> ' 接下来，就是探险顺序读取文件的内容，组合一下，不用再随机的了，因为文件名就是随机好的<br /> ' 读取的数量在  取随机数(1,取数组成员数(t))  之间<br /> <br /> .子程序 回调函数<br /> .参数 文件名, 文本型<br /> .参数 文件路径, 文本型<br /> <br /> 集_路径 ＝ 集_路径 ＋ 文件路径 ＋ “#”<br /> <br /> .子程序 子程序_随机<br /> .参数 参_数组, 文本型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 t, 文本型<br /> .局部变量 循环次数, 整数型<br /> <br /> 循环次数 ＝ 取数组成员数 (参_数组)<br /> .计次循环首 (循环次数, i)<br />     置随机数种子 ()<br />     n ＝ 取随机数 (1, 循环次数)<br />     t ＝ 参_数组 [n]<br />     参_数组 [n] ＝ 参_数组 <i><br />     参_数组 <i> ＝ t<br /> .计次循环尾 ()

补充内容 (2019-7-30 13:25):
可能还有些小问题，少部分代码要修改一下

难解

简单！！！！！！把全部文件 枚举到一个数组里面。。然后 组合。。。

寒潮

1、用精益模块的文件_枚举Ex（）命令，枚举三个文件夹的上级目录，包括子文件夹，把所有文件加入一个数组
2、读取各个文件，随机读取内容
3、组合，写入指定的文件夹。

有梦就追

大神帮我写下，谢谢

有梦就追

难解 发表于 2019-7-15 15:55
简单！！！！！！把全部文件 枚举到一个数组里面。。然后 组合。。。

请大神明示

有梦就追

走一回 发表于 2019-7-15 16:53
这个5精币太少了。
[e=0].版本 2

嗯，可以在加

有梦就追

有梦就追 发表于 2019-7-15 17:22
嗯，可以在加

太难了，这个不太懂

寒潮

有梦就追 发表于 2019-7-15 16:14
大神帮我写下，谢谢

文本.e (884.56 KB, 下载次数: 4)

2019-7-17 11:04 上传

点击文件名下载附件