如何用按键精灵查找txt文件内指定字符“----”前和后的内容 5
我有一个txt文件格式是下面这样,想提取----前面和后面的内容并输出出来,有大神指导怎么做吗?帮忙贴个代码1283634634-----ewrjkd-----82384...
我有一个txt文件格式是下面这样,想提取 ---- 前面和后面的内容并输出出来,有大神指导怎么做吗?帮忙贴个代码
1283634634-----ewrjkd-----82384628
1299574875----sdfjdkjj----320483290
1283634634-----ewrjkd-----82384628
1299574875----sdfjdkjj----320483290 展开
1283634634-----ewrjkd-----82384628
1299574875----sdfjdkjj----320483290
1283634634-----ewrjkd-----82384628
1299574875----sdfjdkjj----320483290 展开
展开全部
Text = Plugin.File.ReadFileEx("C:\Users\msi\Desktop\a.txt")//文档位置你自己改
Array_hang = Split(Text, "|")//以行分割成数组
If UBound(Array_hang)>=0 Then//判断是否有内容
For i = 0 To UBound(Array_hang)-1//循环读取到的内容
beg = InStr(Array_hang(i), "-") - 1//找到“-”第一次出现的位置
If beg > 0 Then//判断是否找到“-”,用于判断此行是否有内容
lef = Left(Array_hang(i),beg)//截取“-”之前的内容
las = InStrRev(Array_hang(i), "-")//找到“-”最后一次出现的位置
lon = Len(Array_hang(i))//字符串长度
rig = Right(Array_hang(i),lon-las)//截取“-”之后的内容
TracePrint lef&rig//控制台输出
End If
Next
End If
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询