Make your computer Speak

This  trick amaze your friends.But using this you can Make your computer
speak whatever you type.Don't want to use any programming skills.
Follow these small tricks

Step 1: Open notepad and copy this Code into it.
        
    Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message


Step 2: Save the notepad file as Speak.vbs you can use any name,make
            sure after your name input  .vbs

Step 3: Now double click Speak.vbs  file and type whatever you want.
            Click OK.

Enjoy it.