很多时候 我们读取txt 用traceprint输出后 最头上会莫名其妙多出一个问号 但是你用问号匹配他 却匹配不到 就是1个未知字符 这个到底是什么 怎么避免出现这个东西呢
这个主要是txt文件存在一个bom头字符串 但是 安卓状态下 txt却不认识这个字符串 这个bom头在电脑是不可见的
处理办法
1 使用类似noytepad++之类的编辑工具把txt文件的bom头去掉 然后再把这个txt传到安卓上 开始脚本处理
2 脚本每次读取txt会检测文件内容开始是否存在bom头字符串 存在则替换掉 不存在更好
第一个办法 我就不用演示了 自己去处理下即可
第二个 我是用一个函数来实现处理的 可以参考下
Function 文本文件格式化操作(文件路径) Dim 读取内容 读取内容 = Trim(file.Read(文件路径)) //判断开头3个字符是否是bom头 If Mid(读取内容, 1, 3) = Chr(239) & Chr(187) & Chr(191) Then //有则替换为空 然后重新写入内容 这个地方不确定是否除了第一行之外还可能存在bom头 应该没那么巧 file.Write 文件路径, Replace(读取内容, Chr(239) & Chr(187) & Chr(191), "") End If //如果txt里面最后不是以\r\n结尾的 就自动添加一个回车换行符 来实现这个 也解决了替换最后一行 不写\r\n会替换找不到的情况 If trim(读取内容)<>""and Right(读取内容, 2) <> "\r\n" Then file.Write 文件路径, 读取内容 & "\r\n" End If End Function
原文地址:https://www.cnblogs.com/zjl8455482/p/9225538.html
时间: 2024-10-22 21:47:23