Hello my blog readers,
message=InputBox("What your computer will speak?","Free Text To Voice Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
2:- Ohhh you just did the toughest part. Now save the notepad file with the name Voice_Translator.vbs on Desktop. Make sure that your file extension is ".vbs". Default extension of Notepad in ".txt" change it to ".vbs".
3:- We are ready to run our awesome tool and impress our friends. Just ouble click on "Voice_Translator.vbs" file type your text in the box and then click ok and computer speak now.











