Text to Speech Using VBS

Intro: Text to Speech Using VBS

Hello guys and once again welcome to my instructable. Today i'm going to show you how to make a really easy to use text to speech program. Lets get started :D

STEP 1: Step 1: Open Notepad and Paste Code

Open notepad and paste this into it:

Dim message, sapi
message=InputBox("What do you want me to say?","Made by Candy") Set sapi=CreateObject("sapi.spvoice") sapi.Speak message

Make sure you save it as speech.vbs

also change the "Save as" to all files

STEP 2: Open It Up

Once you save it find wherever you saved it to and open it.

Type whatever you want into the box and turn you volume up.

It should work. Anyways thanks guys for reading and i hoped i help some of you make your computer talk.

Have a nice day :D

Comments

[perezchicaaaron942]

IT DOESNT WORK ON MY WIN10 PC

[Hoverboard2525​]

bro it's a virus

[Cat Coder]

Um, it dosen't work for me.

[Tisu_25]

oh,good idea! i am just learningto program! This is helpful, thanks @destructoboy02

[LakshayS12]

what if i want the box to not close when i click ok?

[destructoboy02]

put "do" as the top line (without the quotation marks) and "loop" at the bottom. (without quotation marks)