24/08/2005, 12:13
|
 | | | Fecha de Ingreso: agosto-2004
Mensajes: 388
Antigüedad: 20 años, 8 meses Puntos: 0 | |
| mira con esto me sale... pero obviamente corta las palabras en medio de las silabas y quisiera evitar eso... ¿como puedo saber donde termina una palabra, o sea, encontrar el espacio en blanco despues de la variable a?
largo=len(text1)/58
i = 1
For x = 1 To largo + 1
a = 58
impr = Mid(text1, i, a)
Debug.Print impr
' largo = Len(impr)
i = i + a
Next x
__________________
"How do you define Real?" |