Wednesday, 28 December 2016

How to Make your PC to speak

Procedure

  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.
 

No comments:

Post a Comment