This is very cool notepad trick and this code will convert your text into an audio file. Just copy the below code and paste it into notepad and save it as “text-to-audio.vbs”
Steps:
1. Open Notepad and type the following command.
Dim message, sapi
message=InputBox(“What should I speak?”,”Speak to me”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
2. Save the file as speak.vbs
3. Open the file, type the sentence you want Notepad to speak and click OK.
Steps:
1. Open Notepad and type the following command.
Dim message, sapi
message=InputBox(“What should I speak?”,”Speak to me”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
2. Save the file as speak.vbs
3. Open the file, type the sentence you want Notepad to speak and click OK.