Visual Basic - Pasar textbox multiline a listbox

como puedo pasar el contenido de un textbox multiline, a un listbox como items de antemano muchas gracias

MIRA YO LO HAGO DENTRO DE UN DO WHILE
Glosa es el textbox multilinea
POSICION=1
Do While InStr(POSICION, glosa, Chr(13))
LINEATEXTO = Mid(glosa, POSICION, InStr(POSICION, glosa, Chr(13)) -POSICION)
detalle.AddItem CANTIDAD + " " +LINEATEXTO + " " + precio + " " + total
POSICION = POSICION + Len(LINEATEXTO) + 2
LOOP
ESPERO TE SIRVA