Monday 1 April 2013

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



 ပထမဦးဆံုး 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 ပဲရမယ္။
မွတ္ခ်က္==မည့္သည့္အႏၱရာယ္မွမရွိပါ။

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


ေအာင္ေအာင္(မကစ) ရဲ႕ ဘေလာ့ခရီးသည္ေလးအား အားေပးေနၾကတဲ့အတြက္ ေက်းဇဴးအထူးတင္ပါတယ္.. တုန္႕ျပန္မွဳအေနနဲ႕ fb like ေလးေတာ့ လုပ္ေပးခဲ့ၾကပါေနာ္.. တတ္စြမ္းသမွ် ေတြ႕ ရွိသမွ်ေလးေတြကို ျပန္လည္ မွ်ေ၀ေနပါ့မယ္...။ အဆင္မေျပတာမ်ားရွိခဲ့ပါက...cbox မွာ ေျပာခဲ့ၾကပါေနာ္..
<<<မန္ဘာ၀င္ျပီး...Fb Like ျခင္းျဖင့္ အားေပးၾကပါေနာ္>>>
ေအာင္ေအာင္(မကစ) ပိုင္ဆိုင္ေသာ ေနရာေလးမ်ားကိုလာလည္ၾကပါ။ www.aungsanmks.blogspot.com
 www.ledimyethar.com
www.ninilayy.com

0 comments:

Post a Comment