Wednesday, 3 February 2016

কথা বলবে কম্পিউটার! ছোট একটি ট্রিকস নতুনদের জন্য

কথা বলবে কম্পিউটার! ছোট একটি ট্রিকস নতুনদের জন্য
ছোট একটি নোটপ্যাড ট্রিকস ব্যবহার করে আপনি কম্পিউটারকে আপনার লেখা উচ্চারন করাতে পারবেন। এতে দরকার নেই কোন সফটওয়্যারের। শুধু প্রয়োজন মাত্র ২-৪ সেকেন্ড! নিচের কোডটুকু কম্পিউটারের নোটপ্যাড খুলে পেস্ট করুন আর তা সেভ করুন যেকোন নামে তবে মনে রাখবেন নামের শেষে.txt কেটে .vbs লিখে দিবেন। অর্থাৎ ধরুন নামটা হবে speaker.vbs। 
Dim message, sapi
message=InputBox("What do you want me to say?","TA Farden")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
এবার সেভ করা হলে সেই সেভ করা জিনিসটি ওপেন করুন। একটি বক্স আসবে আর সেখানে যা ইংরেজীতে লিখবেন তাই কম্পিউটার পড়ে শুনাবে। যা শুনতে চান তা লিখে Ok চাপুন ব্যাস এবার শুনুন আপনার কম্পিউটারের কথা!