Borra últimos caracteres de cada palabra

Por ej: la casa de juan es gris
Solución : lcdeg

1 Respuesta

Respuesta
1
¿Lo qué quieres es la primera letra de cada palabra?
Puedes usar
texto="la casa de juan es gris"
texto=" " & texto
for a=1 to len(texto)
   if mid(texto,a,1)=" " then solución=solución & mid(texto,a+1,1)
next

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas