请各位帮助，如何在TextBox控件中换行？

Question

Private Sub Command1_Click()
Text1.Text = "gelifeng" & Chr(13) & Chr(10) "is good"或
Text1.Text = "gelifeng" & vbcrlf "is good"End Sub

Answer 1

Text1.Text = "gelifeng" & Chr(13) & chr(10) & "is good"

Answer 2

Text1.Text = "gelifeng" & vbcrlf "is good"

Answer 3

先把文本框的MULTILINE属性设为TRUE,然后
Text1.Text = "gelifeng" & vbNewLine & "is good"
或者
Text1.Text = "gelifeng" & vbCrlf & "is good"

Answer 4

Text1.Text = "dferuygru" & vbCrLf & "834rfdhijkdfh"
或者
Text1.Text = "dferuygru" & vbnewline & "834rfdhijkdfh"