先把代码粘贴到写字板，另存为的名称是：“Unicode.REG”。
首先，不清楚你是用什么方式读文件的，二进制？还是字符串？还是？？？！
给个提示你吧！
A 用 StrConv 函数转换编码
B 用 Forms 2.0 控件集中的 Label 或 TextBox 控件显示读取的数据
这是小儿科，自已动手丰衣足食！试试吧！
--------------------------------------------------
你的操作系统是日文版的XP，应该不会出乱码啊，你的VB是英文版么？
其实VB系统内部是使用 Unicode 会自动转换编码的，详细请参考MSDN介绍相关的用DBCS编码转换的程序例子吧！！！
现在先用简单的方法试试吧！
先引用 Microsoft Forms 2.0 Object library
Dim strLabel As MSForms.Label
Line Input #OLD_FILE_NUM, strLabel.Caption
.......
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024