How to convert any text to audio file?

This tutorials will provide you the way to create a file that will convert the text into audio. Enjoy..

Step 1. First of all Open notepad then copy the below text and paste it in notepad.

Dim message, sapi
message=inputbox("What Do You Want To say?")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

Step 2: After Pasting the Above Code in notepad, Save the file with the name Text To satik.vbs . 
Remember the name of the file should be with .vbs extension.
its nothing but a Vbscript File.
Step 3: Now double click on the saved file and you will see a box like the below pic.
Step 4. Type your text which you want to hear, and then press OK. Thats it. All Done.
You can hear it load and clear.