ေပ်ာ္စရာေလးတစ္ခုလုပ္ၾကမယ္

 ပထမဦးဆံုး Notepad ကိုဖြင့္လိုက္ျပီး ေအာက္မွာ ေဖာ္ျပထာတဲ့ ကုတ္ေတြကို Copy and Paste လုပ္ပါ

Dim msg, sapi
msg=InputBox("Enter your text for conversion–www.youth-it-technican.blogspot.com/","youth-it-technicanText-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg


ျပီးရင္ကိုယ္စိတ္ၾကိဳက္နာမည္နဲ႕Save.. ( .vbs) ဖိုင္နဲ႕ေဆ့
ဥပမာ= kolin.vbs အဲသလိုေပါ့

အိုေက Save.ျပီးရင္ မိမိေဆ့ထားတဲ့ program ေလးကိုဖြင့္ Text Box ေလး မွာ သူငယ္ခ်င္းတို႕ စိတ္ၾကိဳက္စာေတြရိုက္ထည့္ ၿပီးတာနဲ႕ok ႏိွပ္လိုက္ ရင္ရျပီ။
မိမိေရးသားတဲံစာသားအတိုင္း  ကြန္ပ်ဴတာထဲကေန   ေအာ္ေျပာေနမယ္....တိနားးးးးးးးးးးးး အေနာ္ကေတာ့
I LOVE YOU AUNG AUNG  လို႕ေရးၾကည့္တာ....ေိေိ အထဲက ေကာင္မေယးအသံနဲ႕  အဲလို လာေျပာတာခံရတယ္... ေပ်ာ္ခ်ရာေတာင္းးလယ္.....ေိေိ

ဟိဟိ ျမန္မာေတာ့မရဘူးေနာ္..သူ႕က English ပဲရမယ္။
မွတ္ခ်က္==မည့္သည့္အႏၱရာယ္မွမရွိပါ။

သူငယ္ခ်င္းေတြ ေပ်ာ္ရႊင္ရီေမာ၍ ဘဝအေမာေတြေျပပါေစဗ်ာ..