How to make computer speak?

To make a computer speak you have to follow these steps:-

• Open notepad.
• Type the following message in notepad.

Dim Message, Speak
          Message=InputBox("Enter text","Speak")
          Set Speak=CreateObject("sapi.spvoice")
          Speak.Speak Message

Now save it as file.vbs .Make the file format.vbs

Now open the file.Type the message you want computer to speak.