VB6以二进制读取文本文件，回车、换行哪去了？

Question

VB6以二进制读取文件，赋值给文本框，但回车与换行符没有了，所有的字符都在1行上，这个怎么解决呢？
只有5分了，等你来拿！

Answer 1

已测试通过 未发现丢失换行符   我的环境 xp  vb6

注意你的Text1属性设置 Text1.MultiLine = True

 Private Sub Command1_Click()

Dim a() As Byte
Dim al As Long
Dim b As String

'2进制方式读取文本文件
Open App.Path & "\text.txt" For Binary As #1
     al = LOF(1)
     ReDim a(al)
     Get #1, , a
Close #1

MsgBox a

'把2进制信息转换成字符串
b = StrConv(a, vbUnicode)

'输出到Text1
Text1.Text = b

End Sub