你要先阅读一下宽字符和UTF-8的编码方式,a nsi的编码要转换成宽字符再按utf-8编码(关键的前三个比特位)
用StreamReader读text的时候可以指定编码的 StreamReader sr = new StreamReader(filePath, Encoding.UTF-8);查一下msdn
Private Sub Command1_Click()Dim FileName As String, b() As Byte, S As String Dim ADO_Stream As Object FileName = App.Path & "\1.txt" '请修改为具体文件名 If Dir(FileName) = "" Then Exit Sub ReDim b(FileLen(FileName))Open FileName For Binary As #1 Get #1, , b ...
打开文本文件 点击另存为 下面有个编码
你的代码里看不到要转编码吗,不过从你报错信息来看,在第一行加上一句:# coding:gbk 即可解决。
我们已经不用VC6了,那是上个实际的产品。目前的编译器全部是UTF16