Software නැතුව වචන කියවමු

මේක හරිම සරල දෙයක්. අපි මේ සදහා විවිධ Software වර්ග බාවිතා කරනවා. නමුත් අපිට මේ හරහා කිසිදු Software එකක් බාවිතා නොකර වචන කියවන්න පුළුවන්. අපි බලමු කොහොමද මේක කරන්නේ කියලා. මේ පහතින් දක්වලා තියෙන විදිහට කරගෙන යන්නකො.

මුලින්ම Notepad එක Open කරගෙන ඉන්න.

දැන් පහතින් දක්වලා තියෙන එක Copy කරලා Paste කරන්න Notepad එක තුල.

 Dim msg, sapi

msg=InputBox("Enter your text","Talk it")

Set sapi=CreateObject("sapi.spvoice")

sapi.Speak msg

 

දැන් කැමති නමකින් Save කරන්න .vbs ලෙස. උදාහරණයක් ලෙස Read.vbs දක්වන්න පුළුවන්.

දැන් Save කරපු File එක Open කරගෙන වචනයක් Type කරලා Ok කරලා බලන්නකො.

ඔයාලත් මේ ක්‍රමය අත්හදා බලන්නකො. තවත් Post එකකින් හමුවෙමු.