text စာလံုးေတြကုိ notepad နဲ႕ အသံအျဖစ္ေျပာင္းျပီးနားေထာင္မလားးး

Dim msg, sapi
msg=InputBox("Enter your text for conversion–mr.linlat@gmail.com","gtalk prince Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

2)ျပီးရင္သင္စိတ္ၾကိဳက္နာမည္နဲ႕ ( .vbs) ဖိုင္နဲ႕ေဆ့။

3)ျပီးရင္ သင္ေဆ့ထားတဲ့ program ေလးကိုဖြင့္ text box ေလးမွာသင္စိတ္ၾကိဳက္စာေတြထည့္ ok ႏိွပ္
လိုက္ရင္ရျပီ။
မွက္ခ်က္။       ။ English စာလံုးေတြပဲရမယ္။

No comments: