Text1.Text = Text1.Text + vbCrlf