Convert text into audio notepad

Open Notepad
Copy the code below:

Dim msg, sapi
msg=InputBox("Enter your text for Conversation | Tool by Irshad (http://pctricksonline.blogspot.com)","PC Hacks Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

Now save it as text_audio.vbs
Now open the file and type anything and
Click OK