How to Convert Text to Audio Using Notepad

Introduction: How to Convert Text to Audio Using Notepad

this instuctable will show you how to convert text to audio using notepad

Step 1: Step 1: Open Notepad

go to your start menu and open notepad

Step 2: Step 2: Copy and Paste the Code Below

Dim msg, sapi

msg=InputBox("Enter your text for conversion–www.techvorm.com","TechVorm

Text-To-Audio Converter")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg

Step 3: Step 3: Save the File

save the file as audio.vsb

or any other extention with .vsb

ShopBot Challenge

Participated in the
ShopBot Challenge

Be the First to Share

    Recommendations

    • Home and Garden Contest

      Home and Garden Contest
    • Woodworking Contest

      Woodworking Contest
    • Stick It Challenge

      Stick It Challenge

    10 Comments

    0
    SebastianL85
    SebastianL85

    5 years ago

    When trying to use it i get "Script: C:/Users/Sebastian/Documents/audio.vbs

    Line:3

    Char:159

    Error:Unterminated string constant

    Code:800A0409

    Source:Microsoft VBScript compilation error

    Any way to fix it?

    0
    2020minaga.hudson
    2020minaga.hudson

    1 year ago

    use bellow text:

    Dim message, sapi
    message = InputBox("Text to Speech Converter"+vbcrlf+"From https://thegeekpage.com/")
    Set sapi = CreateObject("sapi.spvoice")
    sapi.Speak message

    Screenshot 2020-09-15 151045.png
    0
    cchaos
    cchaos

    10 years ago on Introduction

    Nice tutorial.
    I think the extension should be .vbs (visual basic script) not vsb.
    then you can run the file by double clicking it

    0
    chr15sc
    chr15sc

    Reply 10 years ago on Introduction

    Make sure that the line msg=InputBox("Enter your text for conversion–www.techvorm.com","TechVorm Text-To-Audio Converter") is all on one line.
    You can also change this to: msg="your message"