VB 打开文本文件是乱码，UFT-8和unicode都不行，求帮助，谢谢。

Question

本帖最后由 hzz1121 于 2011-08-22 21:59:17 编辑

Answer 1

老兄啊，一切很正常，没有乱码啊.............打什么飞机？下面是你文件的内容字符 soft (R) Windows Script Host Version 5.7
版权所有(C) Microsoft Corporation 1996-2001。保留所有权利。
服务器名 
端口名 IP_Datamax
主机地址 10.39.100.108
协议 RAW
端口编号 9100
已启用 SNMP 
团体 public
设备索引 1

Answer 2

这个文件就是以普通的ansi码格式存储的，你怎么打开的文件？
Private Sub Command1_Click()
Open "c:\PreprnIP-ct.ini" For Input As #1
Dim x As String, y As String
While Not EOF(1)
   Line Input #1, x
   y = y & x & vbCrLf
Wend
MsgBox yEnd Sub

Answer 3

谢谢楼上的二位,我实在太菜了,貌似把简单的问题复杂化了,我的代码如下:
因为整个文件是别的软件传过来的,我无法判读是什么编码方式,需要截取其中的IP地址,所以画蛇添足的加上了StrConv,结果反而变成了乱码,能否请告诉我错在哪里,如果需要用StrConv,该如何修改代码,再次感谢.Open "C:\Documents and Settings\dyu\Desktop\PreprnIP.ini" For Input As #1
      GetPrnIP.Text = StrConv(InputB(LOF(1), #1), vbUnicode)
    Close #1