Make Your Computer Talk

Step 1 :- Open Notepad, Copy and Paste the exact code given below.

Dim message, sapi

message=InputBox("What do you want me to say?","A1H1")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak message

Step 2 :- Click on File Menu, Save As and save the file as Speak.vbs.

Step 3 :-  Double click on the Speak.vbs, a window will open like the one in the image. Enter some text in column and click on OK.

Now your Computer will talk.