易语言文本_取中间_批量怎么使用
首先,您需要创建一个包含待处理文本的文本文件列表。然后,您可以使用以下代码来批量处理这些文件:
// 打开文本文件列表
filelist = 打开文件对话框("选择文本文件列表", ".txt", "文本文件列表|*.txt|所有文件|*.*", 1)
if filelist = "" then
退出程序()
endif
// 读取每个文件并处理
while not 文件结尾(filelist)
// 读取文件路径
filepath = 读入一行(filelist)
// 打开文件
textfile = 打开文件(filepath, 1)
if textfile = 0 then
输出("无法打开文件:" + filepath)
继续
endif
// 读取文件内容
text = 读入文件(textfile)
// 关闭文件
关闭文件(textfile)
// 处理文本
start = 1
end = 1
while end > 0
// 查找左侧标记
start = 查找文本("<", text, start)
if start = 0 then
退出循环
endif
// 查找右侧标记
end = 查找文本(">", text, start + 1)
if end = 0 then
退出循环
endif
// 提取中间文本
middle = 取子文本(text, start + 1, end - start - 1)
输出("文件:" + filepath + ",中间文本:" + middle)
// 更新起始位置
start = end + 1
endwhile
wend
// 关闭文本文件列表
关闭文件(filelist)
这段代码会逐行读取文本文件列表,并打开每个文件进行处理。对于每个文件,它会读取文件内容并查找左右侧标记之间的文本,然后输出中间文本。最后,它会关闭文件并继续处理下一个文件。
原文地址: https://www.cveoy.top/t/topic/bbYF 著作权归作者所有。请勿转载和采集!