Make your computer speak

Make your computer speak

Don't you feel excited when your computer speaks what ever you tell it.
Surprise your friends with this trick and enjoy with your friends.
Lets see how to make your computer speak with you.
Type the following exactly as given below:


Dim msg, sapi
msg=InputBox("Enter your text for conversion– ","By computer freaks")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

Save this file with .vbs extension.
Double clicking on this file will show a popup menu where you can type you own input nd your computer speaks with you.

Tweet