This is an amazing trick that will wow any your friends and really
impresses them. This trick can work on all Microsoft windows operating system
and requires little or no programming skills.
In this trick, you have to follow
just this three easy steps and your text to voice is ready for use. In this
post I will be making use of windows 7 for this trick…. Now let’s get started.
Step1.
Open Notepad and type the following:
Dim Message, speak
Message=InputBox("Enter
text","Speak")
Set
Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
Or
Dim message, sapi
message=InputBox("What do
you want me to say?","Speak to Me")
Set
sapi=CreateObject("sapi.spvoice")
sapi.Speak message
They both give the same effect, whichever one you make use of.
Step2.
Save the Notepad file with speaks.vbs on your desktop
Step3.
Now double click on the “speaks.vbs” that you just saved at your
desk top and a speak to me box will pop up, then you can type in anything you
want your pc to speak and see what happens… You’re done.
Now your friends will be Impressed and see you as a computer geek.
It ‘s a really funny trick.
Tags:
PC Tricks