我把*.txt文件中的内容显示到文本框中,显示出来了可是都在一行上面,没有换行了!请问怎么办?
代码如下:
Text1.Text = ""
Open "" & App.Path & "\pfxj.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, inputdata
Text1.Text = Text1.Text + inputdata + vbCrLf
Loop
Close #1
代码如下:
Text1.Text = ""
Open "" & App.Path & "\pfxj.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, inputdata
Text1.Text = Text1.Text + inputdata + vbCrLf
Loop
Close #1
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货