Make your computer talk what you type

Hello friends,
                     I must say you might wondering about this trick as the tittle  is a little awkward. But friends this is really true. Just do it by following the easy steps.
1) First, Open Notepad
2) Copy and paste the following code.(Please be careful while copying)
Dim Message, Speak
          Message=InputBox(“Enter text“,”Speak”)
          Set Speak=CreateObject(“sapi.spvoice”)
          Speak.Speak Message
3) Click on file menu and there save as select all types and in the save as option and save the file as speak.vbs
4) Double click on the saved file and a windows will appear and enter some text in enter text column and click ok.
Now your computer will speak what you typed in step 4.
Please please send your feedback if you really liked our trick.
Thanks for reading dear reading.
I hope you are not bored???