Creat your own text to speech script

Today I am sharing a simple technique which you can use to talk as you mention. Write the codes below in a text file and save it as .vbs. Now double click on it. This script will talk as you mention in the quotation mark.

Dim msg, sapi

msg=InputBox("Enter your text","My text to speak")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

Quite funny. Ha!!