Friday, 11 April 2014

Speaking PC

Do you want your PC to speak ?

So just write the following code in notepad and save the file with the name speakingpc.vbs


Code:

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

No comments:

Post a Comment