te recomeidno que antes que pases a lo de cursiva, negrita, etc termines con los primeros errores.
para que se valla abajo antes del [] podes usar el comando LEFT y que se guarde en una matriz de variables lo que resta despues del [], y despues:
bueno algo asi......
para que se valla abajo antes del [] podes usar el comando LEFT y que se guarde en una matriz de variables lo que resta despues del [], y despues:
Código [Seleccionar]
do until variable = Max 'Max vendira a ser la cantidad de lineas (tenes que declarar y hacer el codigo) jej
text1.text= variable(max) & vbcrlf
loop
bueno algo asi......