How to make a text to speech converter using NotePad



If you want to make a text-to-speech converter just follow my lead and do as i say:
First you have to open notepad and write the following code below:

Dim message, sapi
Message=InputBox ("What do you want me to say?","Speak to me")
Set sapi=CreateObject ("sapi.spvoice")
Sapi.Speak message

And save it with a ".vbs" extension.
Now you just have to open ut and type what you want it to speak
Thanks for visiting :)

Comments