Text lines

I have a text box which is multilined (text1) and I have another box which is not (text2) when the user fills in text2 I add the input to text1 using the follwoing code.

If Text2 = "" Then
Else
Text1 = Text1 + " -" + Text2
Text2 = ""
End If

and it works fine but I want it to add each input on a seperate line.Right now every input is put on the same line how do I fix this?

Text1 = Text1 + " -" + Text2 & vbcrlf

Don

Time is the best teacher; unfortunately it kills all its students.

Well, whereever you want the new line to be, add the character vbCrLf, like Text1.Text = Text1.Text & vbCrlf.