23/06/2010, 09:28
|
| | | Fecha de Ingreso: octubre-2009
Mensajes: 80
Antigüedad: 15 años, 2 meses Puntos: 2 | |
| Respuesta: Romper lineas cada 90 caracteres
Averigua por la funcion "InStr()"
InStr([start,]string1,string2[,compare])
n = InStr(90, TextoCompleto, " ") con esta funcion busca desde el caracter 90 el siguiente espacio " " y lo almacena en n y debes sacar ese texto del texto completo
90car = left(TextoCompleto, n-1) n-1 para que no traiga el espacio, luego le restas a TextoCompleto con right(), ojo con el espacio que te queda al principio de la nueva cadena y continuas un ciclo mientras n<>0, luego imprimes lo que te queda.
Si haz hecho algo similar creo que me debes entender. |