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

VB6以二进制读取文件,赋值给文本框,但回车与换行符没有了,所有的字符都在1行上,这个怎么解决呢?只有5分了,等你来拿!... VB6以二进制读取文件,赋值给文本框,但回车与换行符没有了,所有的字符都在1行上,这个怎么解决呢?
只有5分了,等你来拿!
展开
 我来答
小红叶的心
推荐于2016-06-04 · TA获得超过466个赞
知道答主
回答量:37
采纳率:0%
帮助的人:38.9万
展开全部

已测试通过 未发现丢失换行符   我的环境 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
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式