1st Of All Open Notepad
Next Copy and paste below codes...
Dim msg, sapi
msg=InputBox("Enter your text–www.ourtechworld.co.cc","Technical World Text-To-Audio Converter by Apro")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Next Now save this file with .vbs extension..
now write your word and then press enter..& Enjoy
0 comments:
Post a Comment