Notepad ကိုသံုးျပီး English စာလံုးေတြကိုအသံထြက္ခိုင္းရေအာင္
9.5.13
No comments
အခုတင္ေပးလိုက္တဲ့ ပိုစ့္ေလးက ဘာမွေတာ့မဟုတ္ပါဘူး ။ Notepad ကိုအသံုးျပဳျပီးေတာ့ English စာလံုးေတြကို အသံထြက္ေအာင္လုပ္တဲ့နည္းေလးပါ ။ မသိေသးေသာသူမ်ားအတြက္သာရည္ရြယ္ပါတယ္ ။ အရင္ဆံုးအေနနဲ႔ Notepad ကိုဖြင့္လိုက္ပါ ။ ျပီးရင္ Notepad ထဲမွာ ေအာက္က ကုတ္ေလးေတြကို ကူးထည္႔လိုက္ပါ ။
Dim msg, sapi
msg=InputBox("Enter your text for conversion–www.dreamskylover.blogspot.com","saiaarkaroo@gmail.com Text-To-Audio Converter")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
ျပီးရင္ File name မွာမိမိၾကိဳက္ႏွစ္သက္တဲ့နာမည္တစ္ခုေပးျပီး အေနာက္မွာ .vbs လို႔ရိုက္ျပီး Desktop ေပၚမွာ Save လိုက္ပါ။ ျပီးရင္ Desktop ေပၚမွာ Save ထားတဲ့ ဖိုင္ကိုဖြင့္ျပီး ေလးေထာင့္ကြက္ေလးထဲမွာ ေရးခ်င္တဲ့စာကိုေရးလိုက္ပါ ။ ဥပမာ dream လို႔ရိုက္လိုက္မယ္ဆိုရင္ dream ဆိုျပီးအသံျပန္ထြက္လာမွာျဖစ္ပါတယ္ ။ အားလံုးအဆင္ေျပၾကပါေစဗ်ာ ......(မွတ္ခ်က္ ။ ။ အဂၤလိပ္စာမ်ား အတြက္သာ )
0 comments:
Post a Comment