易语言文件分割

『贰』 易语言分割文本

没错,但是你的文本里边其实是有空行的.所以这样...

把那句:

文本 ＝ 分割文本 (编辑框9.内容, #换行符, )
换成:
文本 ＝ 分割文本 (子文本替换 (编辑框9.内容, #换行符 ＋ #换行符, #换行符, , , 真), #换行符, )

『叁』 易语言文本分割

.版本2

.程序集窗口程序集_启动窗口

.子程序_按钮1_被单击
.局部变量正则,正则表达式类
.局部变量网址,文本型
.局部变量文件名,文本型,,"0"
.局部变量MP4文件名,文本型,,"0"

网址＝“像图片里面说的，这个链接都会随时改变但是这中间都有几位数字，如何把它分割http://abcd3345.com/mp44444/123.mp4到编辑框里面”

'--------------------------------------------------------精易模块正则取文本
正则.创建(“h[S]*?(d+).mp4”,网址)
编辑框1.内容＝正则.取子匹配文本(1,1)

'-------------------------------------------------------精易模块取文本
文件名＝分割文本(网址,“/”,)
编辑框1.内容＝文本_取出中间文本(“/”＋文件名[取数组成员数(文件名)],“/”,“.mp4”)

'--------------------------------------------------------无模块取文本
文件名＝分割文本(网址,“/”,)
MP4文件名＝分割文本(文件名[取数组成员数(文件名)],“.”,)
编辑框1.内容＝MP4文件名[1]

三个方法,推荐正则,不会出现错误.

『肆』 易语言分割文本

.版本 2
.局部变量 x, 字节集.局部变量 aa, 文本型, , "0"
x ＝ 读入文件 (“c:\1.txt”)
aa ＝ 分割文本 (到文本 (x), #换行符, )
编辑框1.内容 ＝ aa [1]
编辑框2.内容 ＝ aa [2]
编辑框3.内容 ＝ aa [3]
编辑框4.内容 ＝ aa [4]
编辑框5.内容 ＝ aa [5]

『伍』 请问易语言里如何将运行目录里的文本，分割到超级列表框里

.版本 2

.局部变量 B变量, 整数型
.局部变量 C用作分割, 文本型, , "0"
.局部变量 A分割出的文本, 文本型

C用作分割 ＝ 分割文本 (编辑框4.内容, “--”, )
' 调试输出 (取数组成员数 (C用作分割))
.计次循环首 (取数组成员数 (C用作分割), B变量)
A分割出的文本 ＝ 取文本左边 (C用作分割 [B变量], 2)
编辑框2.加入文本 (A分割出的文本)
.计次循环尾 ()

『陆』 易语言 我要分割一个这样的本地文件，分割好了再另外保存，怎么写

把IP放在源代码的目录下，或许添加IP文件的全路径
.版本
2
.程序集
窗口程序集1
.子程序
_按钮1_被单击
.局部变量
源_IP,
文本型
.局部变量
文本数组,
文本型,
,
"0"
.局部变量
数组成员数,
整数型
.局部变量
i,
整数型
.局部变量
导出的文本,
文本型
源_IP
＝
到文本
(读入文件
(“源IP.txt”))
.如果真
(源_IP
＝
“”)
'
判断文件是否读入成功
信息框
(“获取资源文件失败！”,
0,
)
返回
()
.如果真结束
文本数组
＝
分割文本
(源_IP,
“<br/>”,
)
数组成员数
＝
取数组成员数
(文本数组)
.如果真
(数组成员数
≤
0)
'
判断文件是否分割成功
信息框
(“文件处理失败！”,
0,
)
返回
()
.如果真结束
.计次循环首
(数组成员数,
i)
导出的文本
＝
导出的文本
＋
文本数组
[i]
＋
#换行符
.计次循环尾
()
.如果真
(写到文件
(“处理_IP.txt”,
到字节集
(导出的文本)))
'
判断文件是否写出成功
信息框
(“文件整理成功！”,
0,
)
.如果真结束

『柒』 易语言文本分割

.版本 2
.支持库 xplib
.支持库 edroptarget
.支持库 shell
.支持库 spec
.支持库 iext5

.程序集 窗口程序集1

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

XP风格 (2)
拖放对象1.接收文件 ＝ 真
拖放对象1.注册拖放控件 (编辑框_替换源文件.取窗口句柄 ())

.子程序 _按钮_打开_被单击
.局部变量 文件号, 整数型
.局部变量 文件名, 文本型

.如果真 (通用对话框_打开.打开 () ＝ 真)
编辑框_源文件路径.内容 ＝ 通用对话框_打开.文件名
文件号 ＝ 打开文件 (编辑框_源文件路径.内容, , )
编辑框_文本大小.内容 ＝ 到文本 (四舍五入 (取文件长度 (文件号) ÷ 1024, 2))
关闭文件 (文件号)
文件名 ＝ 取文本中间 (编辑框_源文件路径.内容, 1, 倒找文本 (编辑框_源文件路径.内容, “\”, , 假) － 1)
编辑框_存储路径.内容 ＝ 文件名
.如果真结束

.子程序 _按钮_保存_被单击
.局部变量 路径, 文本型

路径 ＝ 浏览文件夹 (“保存到”, 真)
.如果真 (路径 ＝ “”)
返回 ()
.如果真结束
编辑框_存储路径.内容 ＝ 路径

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

.如果真 (编辑框_源文件路径.内容 ＝ “” 或 编辑框_存储路径.内容 ＝ “”)
信息框 (“请选择路径!!”, 64, “提示”)
返回 ()
.如果真结束
.如果真 (到数值 (编辑框_自定义分割.内容) ＞ 到数值 (编辑框_文本大小.内容) 或 编辑框_自定义分割.内容 ＝ “0”)
信息框 (“输入错误!!”, 64, “提示”)
返回 ()
.如果真结束
.如果 (单选框1.选中 ＝ 真)
自定义分割 ()
.否则
平均分割 ()
.如果结束

.子程序 _单选框2_被单击

.如果真 (单选框2.选中 ＝ 真)
编辑框_自定义分割.禁止 ＝ 真
编辑框_平均分割.禁止 ＝ 假
编辑框_自定义分割.内容 ＝ “”
编辑框_平均分割.内容 ＝ “ 2”
.如果真结束

.子程序 _单选框1_被单击

.如果真 (单选框1.选中 ＝ 真)
编辑框_平均分割.禁止 ＝ 真
编辑框_自定义分割.禁止 ＝ 假
编辑框_平均分割.内容 ＝ “”
.如果真结束

.子程序 自定义分割
.局部变量 自定义_文件号, 整数型
.局部变量 自定义_存放, 文本型
.局部变量 自定义_变量, 整数型
.局部变量 自定义_取文件名, 文本型, , "0"
.局部变量 自定义_取后缀, 文本型, , "0"

.如果真 (编辑框_自定义分割.内容 ＝ “”)
信息框 (“输入分割大小!!”, 64, “提示”)
返回 ()
.如果真结束
自定义_文件号 ＝ 打开文件 (编辑框_源文件路径.内容, , )
移到文件首 (自定义_文件号)
调试输出 (四舍五入 (到小数 (编辑框_文本大小.内容), ) ÷ 到数值 (编辑框_自定义分割.内容))
.变量循环首 (1, 四舍五入 (到小数 (编辑框_文本大小.内容) ÷ 到数值 (编辑框_自定义分割.内容), ), 1, 自定义_变量)
自定义_存放 ＝ 到文本 (读入字节集 (自定义_文件号, 到数值 (编辑框_自定义分割.内容) × 1024))
' 调试输出 (自定义_存放)
自定义_取文件名 ＝ 分割文本 (编辑框_源文件路径.内容, “\”, )
自定义_取后缀 ＝ 分割文本 (自定义_取文件名 [取数组成员数 (自定义_取文件名)], “.”, )
写到文件 (编辑框_存储路径.内容 ＋ “\” ＋ 自定义_取后缀 [1] ＋ “_” ＋ 到文本 (自定义_变量) ＋ “.txt”, 到字节集 (自定义_存放))
.变量循环尾 ()
信息框 (“分割完成”, 64, “提示”)
关闭文件 (自定义_文件号)

.子程序 平均分割
.局部变量 平均_文件号, 整数型
.局部变量 平均_数量, 整数型
.局部变量 平均_计次, 整数型
.局部变量 平均_取文件名, 文本型, , "0"
.局部变量 平均_取后缀, 文本型, , "0"
.局部变量 平均_存放, 文本型

平均_文件号 ＝ 打开文件 (编辑框_源文件路径.内容, , )
移到文件首 (平均_文件号)
平均_数量 ＝ (取整 (到小数 (编辑框_文本大小.内容)) ＋ 0.4) ÷ 到数值 (编辑框_平均分割.内容)
调试输出 (平均_数量)
调试输出 (取整 (到小数 (编辑框_文本大小.内容)) ＋ 0.4)
.计次循环首 (到数值 (编辑框_平均分割.内容), 平均_计次)
平均_存放 ＝ 到文本 (读入字节集 (平均_文件号, 平均_数量 × 1024))
平均_取文件名 ＝ 分割文本 (编辑框_源文件路径.内容, “\”, )
平均_取后缀 ＝ 分割文本 (平均_取文件名 [取数组成员数 (平均_取文件名)], “.”, )
写到文件 (编辑框_存储路径.内容 ＋ “\” ＋ 平均_取后缀 [1] ＋ “_” ＋ 到文本 (平均_计次) ＋ “.txt”, 到字节集 (平均_存放))
.计次循环尾 ()
信息框 (“分割完成”, 64, “提示”)
关闭文件 (平均_文件号)

.子程序 __启动窗口_将被销毁

关闭所有文件 ()

' ==========================================================================================

.子程序 _替换_打开_被单击

.如果真 (通用对话框_打开1.打开 () ＝ 真)
编辑框_替换源文件.内容 ＝ 到文本 (读入文件 (通用对话框_打开1.文件名))
替换_替换.禁止 ＝ 假
替换_保存.禁止 ＝ 假
.如果真结束

.子程序 _替换_清空_被单击

编辑框_替换源文件.内容 ＝ “”

.子程序 _替换_替换_被单击

载入 (替换, , 假)

.子程序 _替换_保存_被单击

.如果真 (通用对话框_保存.打开 () ＝ 假)
返回 ()
.如果真结束
写到文件 (通用对话框_保存.文件名, 到字节集 (编辑框_替换源文件.内容))

.子程序 _编辑框_替换源文件_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 ＝ 65 且 功能键状态 ＝ #Ctrl键状态)
编辑框_替换源文件.获取焦点 ()
编辑框_替换源文件.起始选择位置 ＝ 0
编辑框_替换源文件.被选择字符数 ＝ 取文本长度 (编辑框_替换源文件.内容)
.如果真结束

.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型

编辑框_替换源文件.内容 ＝ 到文本 (读入文件 (接收到的文件路径))
.如果真 (编辑框_替换源文件.内容 ≠ “”)
替换_替换.禁止 ＝ 假
替换_保存.禁止 ＝ 假
.如果真结束

.子程序 _高级选择夹1_子夹头被单击
.参数 子夹索引, 整数型

.如果真 (子夹索引 ＝ 1)
气球提示框1.弹出提示框 (_启动窗口.左边 ＋ 编辑框_替换源文件.左边 ＋ 50, _启动窗口.顶边 ＋ 编辑框_替换源文件.顶边 ＋ 50, “可直接拖入文本”, -1, 真)
播放音乐 (“C:\WINDOWS\Media\Windows XP 气球.wav”, 假)
.如果真结束

.子程序 _编辑框_替换源文件_内容被改变

.如果 (编辑框_替换源文件.内容 ≠ “”)
替换_替换.禁止 ＝ 假
替换_保存.禁止 ＝ 假
.否则
替换_替换.禁止 ＝ 真
替换_保存.禁止 ＝ 真
.如果结束

『捌』 易语言把一个TXT文件分割成多个TXT文件，求助

.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 源文件, 文本型
.局部变量 分割, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 o, 整数型
.局部变量 分割好的, 文本型
.局部变量 p, 整数型
源文件 ＝ 到文本 (读入文件 (“C:\Documents and Settings\Administrator\桌面\教程.txt”))
分割 ＝ 分割文本 (源文件, #换行符, )
.计次循环首 (取数组成员数 (分割), i)
o ＝ o ＋ 1
.如果 (o ＞ 6)
p ＝ p ＋ 1
写到文件 (取运行目录 () ＋ “\” ＋ 到文本 (p) ＋ “.txt”, 到字节集 (分割好的))
分割好的 ＝ “”
o ＝ 1
.否则
分割好的 ＝ 分割好的 ＋ 分割 [i] ＋ #换行符
.如果结束
.计次循环尾 ()

我也是新手，用文本分割就行了！

『玖』 易语言如何分割文本

你是想读入文件里的文本，然后把里面的东西放到a和b里，然后再用----分开？
还是已经有了文本，直接放到a和b里，然后再用----分开？
解1：想读入文件里的文本，然后把里面的东西放到a和b里，然后再用----分开
.版本 2

.程序集 窗口程序集1
.程序集变量 文件内容, 文本型
.程序集变量 文件数组, 文本型, , "0"

.子程序 _按钮1_被单击
.局部变量 i, 整数型

文件内容 ＝ 到文本 (读入文件 (“文件路径”))
文件数组 ＝ 分割文本 (文件内容, “----”, )
.变量循环首 (1, 取数组成员数 (文件数组), 2, i)
组合框1.现行选中项 ＝ 组合框1.加入项目 (文件数组 [i] ＋ “ 密码：” ＋ 文件数组 [i ＋ 1], )
.变量循环尾 ()

解2：已经有了文本，直接放到a和b里，然后再用----分开

.版本 2

.程序集 窗口程序集1
.程序集变量 文件内容, 文本型
.程序集变量 文件数组, 文本型, , "0"

.子程序 _按钮1_被单击
.局部变量 i, 整数型

文件内容 ＝ #内容
文件数组 ＝ 分割文本 (文件内容, “----”, )
.变量循环首 (1, 取数组成员数 (文件数组), 2, i)
组合框1.现行选中项 ＝ 组合框1.加入项目 (文件数组 [i] ＋ “ 密码：” ＋ 文件数组 [i ＋ 1], )
.变量循环尾 ()

.版本 2

.常量 内容, "用户名1----密码"

『拾』 易语言分割文件写配置

我有免费的文件分割工具，免安装且自定义分割单位，还支持自合并功能，需要的M，加QQ务必注明原因才可能通过，否则不通过