notepad trick: convert text to audio using notepad

Notepad ; a simple programme. But we can do lot's of things with this. I gave you more tricks from notepad here before. Today I am going to tell you another notepad trick. If you want to convert your text in to audio you have to use any programmes. But from this method you don't want to use another software.  An easy trick from Notepad.
 Let's start.
Open notepad.
Copy the code bellow.

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

Now save it as text_audio.vbs
And that's it.
Now open the file and type anything. Then click OK.
Don't forget to comment.