Monday, 25 August 2014

Convert Your Text Into Audio.

OPEN NOTEPAD AND WRITE FOLOWWING CODE -> SAVE WITH .VBS

Dim msg, sapi

msg=InputBox("Enter your text for conversion–","By computer freaks")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg 

 

 

No comments:

Post a Comment