window ေပၚမွာ ရိုက္သမွ်စာေတြ အသံထြက္ခိုင္းၾကည့္မယ္
Posted in နည္းပညာမ်ား
No comments
Wednesday, 13 August 2014 By htwe naing
ကၽြန္ေတာ္တို႔ရိုက္ထည့္သမွ်စာသားေတြကိုသူကအသံထြက္ျပမွာပါ
အရင္ဆံုးnotepad ကိုဖြင့္ပါျပီးရင္ ေအာက္ကစာေတြကို notepad ထဲမွာ copy ကူးထည့္လိုက္ပါ။
အရင္ဆံုး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
Share this post
0 comments: