读取ansi编码的文本文件

Question

读取ansi编码的文本文件内容，是乱码，如何解决呢？谢谢。

Answer 1

哪位好心的大哥告诉我一下，如果读取编码为ansi的文本文件，代码应该是？？？非常感谢。

Answer 2

Open App.Path & "\AA.txt" For Input As #1
       Do
       Input #1, a
       b = b & a
     
       If EOF(1) Then Exit Do
        Loop
读完了,转换过来
dim bb 
     bb = StrConv(Trim(b), vbUnicode)
或者是
    bb= StrConv(Trim(b), vbFromUnicode)
看哪个能转换过来就用哪个了