Private Sub Command1_Click()
Text1.Text = "gelifeng" & Chr(13) & Chr(10) "is good"或
Text1.Text = "gelifeng" & vbcrlf "is good"End Sub
Text1.Text = "gelifeng" & Chr(13) & Chr(10) "is good"或
Text1.Text = "gelifeng" & vbcrlf "is good"End Sub
Text1.Text = "gelifeng" & vbNewLine & "is good"
或者
Text1.Text = "gelifeng" & vbCrlf & "is good"
或者
Text1.Text = "dferuygru" & vbnewline & "834rfdhijkdfh"