window ေပၚမွာ ရိုက္သမွ်စာေတြ အသံထြက္ခိုင္းၾကည့္မယ္

No comments
Wednesday, 13 August 2014 By htwe naing

ကၽြန္ေတာ္တို႔ရိုက္ထည့္သမွ်စာသားေတြကိုသူကအသံထြက္ျပမွာပါ
အရင္ဆံုးnotepad ကိုဖြင့္ပါျပီးရင္ ေအာက္ကစာေတြကို notepad ထဲမွာ copy ကူးထည့္လိုက္ပါ။

 Dim msg, sapi  msg=InputBox("Enter your text for conversion–www.tips4mm.tk","Tips And Tricks For All")  Set sapi=CreateObject("sapi.spvoice")  sapi.Speak msg


audio.vbs ဆိုျပီး save လိုက္ပါဖြင့္လိုက္
မိမိသိလိုေသာစာလံုးကိုရိုက္ထည့္ျပီးေတာ့အသံထြက္ကိုၾကည့္ႏိုင္ပါတယ္
မရွင္းရင္ပံုေတြကိုအရင္ၾကည့္လို္က္ပါ။


 

 credit to >>>  http://www.aungmyokyaw.com

Related posts

0 comments:

About the Author

ကၽြန္ေတာ္ IT ပညာရွင္တစ္ေယာက္မဟုတ္ပါ ကၽြန္ေတာ္သိသမွ် မွတ္ထားသမွ် နည္းပညာေလးေတြျပန္လည္မွ်ေဝျခင္းသာျဖစ္ပါတယ္။ လာလည္ၾကတဲ့သူငယ္ခ်င္းမ်ားအားလံုးကိုလဲေက်းဇူးပါ။