vb用input读取文件，挨着字符读取，写入到text1.text，可是结果显示不出换行

Question

能读取回车，但是在text框中却不换行，老师讲的时候我记得我做了一下 ，还可以显示出致橡树的格式呢，现在要考试了，做了一下发现不行了，都在一行显示，不换行，帮我 T.T
Private Sub Command1_Click()
Dim s$
Open "c:\text.txt" For Input As #1
Do
s = Input(1, #1)
Text1.Text = Text1.Text & s
Loop Until EOF(1)
close #1
End Sub

Answer 1

text1.text=Text1.Text & s & vbCrLf
VBCRLF是换行符号、、、、、、、不弄不行的

Answer 2

你要把 Text1 的 Multiline 属性 设为 True

Answer 3

text框需要设置多行属性为真。

Answer 4

multiline 设为 true
text1.text=text1.text & s & vbcrlf