Pasting data from excel to userform

I am trying to paste data from excel to userform. I have tried using ShowModal but the problem I am getting is the data that is supposed to be pasted in excel changes. Please help. The problem I am getting is shown in the attached file.
problem2.jpg

select the row you want copied to the form
click the macro button/or run macro

at form activate event

r = activecell.row
txtBox1 = range("A" & r).value
txtBox2 = range("D" & r).value
cboBoxState = range("C" & r).value

The excel sheet from which the data is to be copied changes every time as in a new excel file. (Eg:- Item Description, Quantity & Amount is to be selected from Purchase Order. I have to do it for every Purchase Order during filling the form.) I am able to paste the data. The data filled in the form was getting pasted correctly including multiline textboxes. But after starting ShowModal the singleline textbox data gets pasted on the last line of multiline data.

Guys, please help. Have to complete it by end of this week.

Help !!!!