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

    • Pi Day Speed Challenge

      Pi Day Speed Challenge
    • Trash to Treasure Contest

      Trash to Treasure Contest
    • Microcontroller Contest

      Microcontroller Contest

    10 Comments

    0
    SebastianL85
    SebastianL85

    4 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

    5 months 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

    9 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 9 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"