Visual Basic - No se k hacer

tengo el siguiente codigo:
Objeto.CurrentY = 11
For i = 0 To 10
If txtConcepto(i) = "" Then
Objeto.CurrentX = -0.5
Objeto.Print ""
Else
Objeto.CurrentX = -0.5
Objeto.Print txtConcepto(i).Text & vbCrLf
End If
If txtCantidad(i) = "" Then
Objeto.CurrentX = 14.8
Objeto.Print ""
Else
Objeto.CurrentX = 14.8 - Objeto.TextWidth(txtCantidad(i))
Objeto.Print txtCantidad(i).Text & vbCrLf
End If
If txtPrecio(i) = "" Then
Objeto.CurrentX = 16.3
Objeto.Print ""
Else
Objeto.CurrentX = 16.3 - Objeto.TextWidth(txtPrecio(i))
Objeto.Print txtPrecio(i).Text & vbCrLf
End If
If txtImporte(i) = "0,00" Then
Objeto.CurrentX = 17
Objeto.Print ""
Else
Objeto.CurrentX = 18.3 - Objeto.TextWidth(txtImporte(i))
Objeto.Print txtImporte(i).Text & vbCrLf
End If
Next i

mi problema es k tengo k hacer coincidir los txtcantidad, txtprecio, txtimporte, con la coordenada ' y ' de la primera linea del txtconcepto teniendo en cuenta k este es un textbox multilinea en el k no hay limite de lineas, si alguien me podria ayudar........ Muchas gracias!!!!!!!!