vba判断文件编码格式_如何用vba判断一个记事本文本文件是什么编码？

最新推荐文章于 2022-03-30 11:43:17 发布

weixin_39791152

最新推荐文章于 2022-03-30 11:43:17 发布

阅读量1.4k

点赞数

文章标签： vba判断文件编码格式

本文链接：https://blog.csdn.net/weixin_39791152/article/details/111859036

版权

本文介绍了如何使用VBA来判断文本文件的编码格式，通过读取文件头的字节来识别是ANSI、Unicode Big Endian、Unicode Little Endian还是UTF-8编码，并提供了一段示例代码。

摘要由CSDN通过智能技术生成

在了解如何用vba判断一个文本文件是以什么编码形式保存之前，我们先来了解下字节序的概念。

比如一个中文字符“保”的unicode编码为4FDD，在存入到计算机时，需要用2个字节，如果第一个字节存4F，第二个字节存DD，那么它的字节序就是Big Endian。如果第一个字节存DD，第二个字节存4F，那么它的字节序就是 Little Endian。

由于一个文本文件可以保存为ANSI编码、Unicode Little Endian 编码、Unicode Big Endian 编码、UTF-8编码，为了便于识别具体是用哪种编码哪种字节序存储的文本文件，Windows 引入了BOM(Byte Order Mark，字节序标记)来表征文本文件的编码方式。

在unicode编码中有一个叫做”ZERO WIDTH NO-BREAK SPACE”的字符，它的编码是FEFF。而FFFE在unicode编码中是不存在的字符，所以不应该出现在实际传输中。UCS规范建议我们在传输字节流前，先传输字符”ZERO WIDTH NO-BREAK SPACE”。这样如果接收者收到FEFF，就表明这个字节流是Big-Endian的；如果收到FFFE，就表明这个字节流是Little-Endian的。因此字符”ZERO WIDTH NO-BREAK SPACE”又被称作BOM。

UTF-8不需要BOM来表明字节顺序，但可以用BOM来表明编码方式。字符”ZERO WIDTH NO-BREAK SPACE”的UTF-8编码是EF BB BF。所以如果接收者收到以EF BB BF开头的字节流，就知道这是UTF-8编码了。

Windows就是使用BOM来标记文本文件的编码方式的。

当用编程的方式判断一个文本文件的编码方式时，如果以二进制形式读取文件头的前两个字节，如果是FEFF，则表示Unicode Big Endian 编码。如果是FFFE，则表示Unicode Little Endian 编码。如果前三个字节是EFBBBF则表示UTF-8编码。如果都不是，则表示是ANSI编码。

有了以上的知识，可以使用以下的代码判断一个文本文件的编码方式：

Visual Basic

Sub QQ1722187970()

Dim sPath As String

sPath = "c:\test.txt"

iFN = VBA.FreeFile

Open sPath For Binary Access Read As iFN

Dim iLenB

'获取打开文本文件的字节数

iLenB = VBA.LOF(iFN)

If iLenB > 0 Then

Dim sResult() As Byte