Dim TempFile As Long
Dim LoadBytes() As Byte
TempFile = FreeFile
Open "c:\迅则checkupdate.txt" For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFile
Text1.Text = StrConv(LoadBytes, vbFromUnicode) //???,感觉这里转拍汪码转错了,但不袭昌仔明白
End Sub
这是因为你的文件是UTF-8的,对不对?记事本等程序在保存UTF-8的文件时候,会在最前面加上一个特殊的编码,这会造成誉洞显示散升乱码。
EditPlus等软件可以保存为无BOM的UTF-8,就能避免这样的问庆掘枯题。
fopen() 里 要用 "rb" 模式 打开文件。用 fread() 读文件,按字节数sizeof(结构)读,友猜你的数据文件必须是2进制文件,野念且通常是用 fwrite() 写成的文件。
这样,你的fopen() 里 需要 用 "rb" 模式,而颂告困不是 "r"。
如果你的文件是用 fprintf() 写成的,那么要用 fscanf() 读。sizeof(结构)计算出的字节数会有误差的。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)