
How To Do It ?
- Open Notepad file on your Windows PC.
- Copy and paste the below mentioned code :
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
- Save this file with any name with .vbs as extension. For eg. Text-To-Audio.vbs
0 comments:
Post a Comment