Paso 2: El código
Dim texto, sapi
texto = inputbox ("Introduzca el texto para ser hablado")
Set sapi=Createobject("sapi.spvoice")
SAPI. Hablar de texto
Ahora ¿qué significa esto?
-Cuando se ejecuta esta secuencia de comandos crea primero un cuadro de entrada que es reconocido como "texto".
-A continuación la secuencia de comandos configura el sapi así que ahora podemos usarlo (esto lo que se habla)
-Por último se toma lo que se ha escrito en el cuadro "texto" y envía a la sapi para ser hablado.