Text to Speech Using VBS

Introduction: Text to Speech Using VBS

About: I love everything from computers/gaming consoles to skateboarding and enjoying life. My goal is to create instructables that may benefit the user in anyway possible.

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

Teacher Notes

Teachers! Did you use this instructable in your classroom?
Add a Teacher Note to share how you incorporated it into your lesson.

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

Be the First to Share

    Recommendations

    • LED Strip Speed Challenge

      LED Strip Speed Challenge
    • Sculpting Challenge

      Sculpting Challenge
    • Clocks Contest

      Clocks Contest

    4 Discussions

    0
    Cat Coder
    Cat Coder

    4 months ago

    Um, it dosen't work for me.

    0
    Tisu_25
    Tisu_25

    11 months ago

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

    0
    LakshayS12
    LakshayS12

    3 years ago

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

    0
    destructoboy02
    destructoboy02

    Reply 2 years ago

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