বানিয়ে ফেলুন Text to Voice সফটওয়ার এবং টেকস্ট দিয়ে কন্ঠস্বর উপভোগ করুন…..

১. আপনার নোটপ্যাড ওপেন করে নিচের কোডটুকু কপি করে পেষ্ট করুন।

Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

২. এখন নোটপেড ফাইলটাকে speak.vbs নামে সেইভ করুন।

৩. সেইভ শেষে speak.vbs ফাইলটি ডাবল ক্লিক করে ওপেন করে টাইপ করুন কম্পিউটার আপনাকে যা পড়ে শুনাবে।

Posted in: ProGramming