আমরা অনেকেই বিভিন্ন প্রয়োজনে টেক্সট টু ভয়েস কনভার্টার জাতীয় সফটওয়্যার ব্যবহার করি। এখন যদি শুধু নোটপ্যাড ব্যবহার করেই টেক্সট টু ভয়েস কনভার্টার তৈরি করা যায় তাহলে কেমন হয়? চলুন তাহলে দেখি কেমন করে নোটপ্যাড দিয়ে টেক্সট টু ভয়েস কনভার্টার তৈরি করে যায়।
প্রথমে নোটপ্যাড চালু করে নিচের কোড গুলো লিখুন এবং একে Text to Voice Converter.vbs নামে সেভ করুন।
প্রথমে নোটপ্যাড চালু করে নিচের কোড গুলো লিখুন এবং একে Text to Voice Converter.vbs নামে সেভ করুন।
Dim msg, sapiএবার কোন টেক্সট কনভার্ট করতে হলে তৈরি করা Text to Voice Converter.vbs চালু করুন। এবার বক্সে টেক্সট লিখে OK তে ক্লিক করুন। ভাল লাগলে কমেন্ট করার চেষ্টা করবেন।
Set sapi=CreateObject(“sapi.spvoice”)
msg=InputBox (“Right anything in this box and click OK.”,”Text to Voice Converter”)
sapi.Speak msg


No comments:
Post a Comment