Paso 2: Cómo
Abra el Bloc de notas.
Copie y pegue este código en el Bloc de notas.
Dim speechobject
Set speechobject=createobject("sapi.spvoice")
decir = inputbox ("¿qué gustaría decir?", "creado por VB Scripting")
speechobject.Speak "" + decir
MsgBox ("Esto fue creado por VB Scripting / / Nick Smith.", "Créditos")
Puede cambiar este VBScript y crear uno nuevo muy fácilmente. Sólo cambia el texto "¿qué gustaría decir?" en lo que quieras el texto. Recuerde mantener las comillas alrededor del texto!