Text to Audio Converter With Notepad

Today I Will Show You That To Convert Text Into Audio.. Just Follow Three Simple Steps :)

1. Create A Notepad On Desktop.
2. Copy The Given Code Into the Notepad.

Dim msg, sapi

msg=InputBox("Enter Your Text And Press Enter :)","Jamal Tariq Kashmiri")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg

3. Save The Notepad With .vbs Extention

If You Dont Know How To Save The File With .vbs Extention So Follow The Given Steps.

1. After Pasting The Code Into Notepad, Click On File Menu.
2. Now Click On Save As Option.
3. Popup Window Will Appear. Now In The File name Write The File name With Extension .vbs
    For Example.. Jamal.vbs And Save It.

Now Run The File And Type Text And Press Enter :)

If You Cant Do It Than Download It From There: Text To Audio Converter

Thanks

Muhammad Jamal Tariq Kashmiri