Step 1. First of all Open notepad then copy the below text and paste it in notepad.
Dim msg, sapi
msg=InputBox("Enter your text for conversion–waynehow.weebly.com"," Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Dim msg, sapi
msg=InputBox("Enter your text for conversion–waynehow.weebly.com"," Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Step 2: After Pasting the Above Code in notepad, Save the file with the name Text To Audio.vbs.
YOU WILL SEE LIKE THIS PIC ON WHEREVER YOU HAVE SAVE THE CODE.
DOUBLE CLICK ON THAT WHICH SYMBOLS S AFTER CLICKING YOU SEE RESULT ABOVE PIC.