Convert TEXT into AUDIO without any Software

Hello friends...
We all know that NOTEPAD is such a boring and simple program but we all can make it intresting with the help of different codes...
as i have posted before the code for matrix and other codes too..
so now today i have made a new intresting code or you can say it an easy notepad trick.
this code will help you to convert your text into voice..
all you have to do that just copy the code given below and paste it in notepad..|
code:-

Dim msg, sapi

msg=InputBox("Enter your text for Audio Conversation | Tool by Sagar sood (pcte) (http://troubleshootershub.blogspot.com)","Text-To-Audio Gadget")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg
now after pasting it, save it as speak.vbs

now open that file, write whatever you want your computer to speak...
enjoy and have a great weekend ahead :)