How To Make Your Own Text to Speech Converter

Recently I posted a list of online text to speech converters which is great if you want to listen to a book instead of reading it. But if you want to convert a small piece of text to speech, then there is no need to use any of those websites. Use this simple text to speech converter which you can make in seconds.

How To Make Your Own Text to Speech Converter

Open notepad, and paste the following code in it,

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

Save this text file with the name TextToVoice.vbs. That’s it. Now double click on TextToVoice.vbs whenever you want to convert some text to speech. The Text To Voice window will open.

Type your text in the box and press OK. It will instantly speak what you said. This Text To Voice converter works great on Windows 7, Windows Vista and Windows XP.

1 thought on “How To Make Your Own Text to Speech Converter”

Leave a Comment