A Simple Trick to make your computer speak!!!!

A Trick to make your computer speak:
1. Open your notepad.
2. Copy the following code---->>
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
3. Now save as speak.vbs
4.Now open that saved file then type anything there then click ok and your computer will speak...