How to make your computer speak.

Steps

1. Open Notepad.
2. Copy and paste the exact code given below.

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

    3. Click on File Menu, Save As, select All Types in Save as Type option, and save the file as Speak.vbs or "*.vbs".

    4.  Double click on the saved file, a window will open like the one in the image. Enter some text in enter text column and click OK

Share on Google Plus

About abhilash khatri