How To Make your Computer Speak
Make your Computer Speak:
You will make your Computer Speak whatever you type. Excited ? Then follow the Below Simple Steps.
Step 1: Open Notepad
Step 2: Copy and Paste the Below Code in Notepad.
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoic
sapi.Speak message
Step 3: After Pasting the Above Code in Notepad, its time to Save the File. Save the File with name Speak.vps and again choose All files in save as type
Step 4: Double Click on the File to See a pop up Window that looks something like this Picture
Now All you have to do is Type in Anything that you want it to Convert in Speech.
Then Click on Ok. Wait a second or Two and hear it do its work.
You will make your Computer Speak whatever you type. Excited ? Then follow the Below Simple Steps.
Step 1: Open Notepad
Step 2: Copy and Paste the Below Code in Notepad.
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoic
sapi.Speak message
Step 3: After Pasting the Above Code in Notepad, its time to Save the File. Save the File with name Speak.vps and again choose All files in save as type
Step 4: Double Click on the File to See a pop up Window that looks something like this Picture
Now All you have to do is Type in Anything that you want it to Convert in Speech.
Then Click on Ok. Wait a second or Two and hear it do its work.
No comments: