How To Make Your
Computer Speak or Say Any Thing You Type
Today I will be teaching you guys how to make your computer
speak or say anything you type using Notepad.
There are some steps to follow to achieve that is very
simple so guys just follow the following steps below:
Step (1) Open Your Notepad on your computer system
Step (2) Copy and paste this code below
Dim msg, sapi
msg=InputBox("Enter your text for conversion–http://www.smartklass.blogspot.com/","By – Smart Klass")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
msg=InputBox("Enter your text for conversion–http://www.smartklass.blogspot.com/","By – Smart Klass")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Step (3) Click On file on the drop down menu click save or
Press Ctrl + S
Step (4) On the dialog box the show up or appear save the
file with any file name.vbs extension (Example smartklass.vbs)
0 comments: