সন্মানিত লেখক ও পাঠকগণ,আপনারা সবাই কেমন আছেন? আশা করি আল্লাহ্‌ আপনাদের খুব ভালো রাখছে।আমরা সবাই বিভিন্ন মিডিয়া প্লেয়ার ব্যবহার করি । কিন্ত একবার ভাবুন তো সেই মিডিয়া প্লেয়ার যদি আপনার নিজের বানানো হয়! হ্যা, আজ আপনি  আমার সাথে একটা মিডিয়া প্লেয়ার বানাবেন। তবে প্রস্তুতি নিন ।

রেডি… এক… দুই… তিন…
Visual-Basic-6

পূর্বে প্রকাশ করা হয়েছে নিজে নিজেই ভিজুয়াল বেসিক শিখি এবং সফটওয়্যার বানাই !!!

আজ আমি শিখাব মিডিয়া প্লেয়ার বানানো

প্রথমেই আপনি ভিজুয়াল বেসিক ৬.০ ইনস্টল করুন । এরপর start > program option > visual basic 6.0 এ ক্লিক করে ওপেন করুন।

এবার আপনি বাম দিকে ole এর নিচে রাইট ক্লিক করুন । এরপর components এ ক্লিক করুন।

এবার নিচের লিস্ট থেকে windows media player এর check b0x এ ক্লিক করে apply ও ok করুন।

এবার বাম পাশ থেকে media player এ ক্লিক করে আপনার form এ সেট করুন
আবার একই ফরম এ বাম পাশ থেকে একটি command বাটন ও একটি লিস্ট বক্স
যোগ করুন।

এবার ডান দিক থেকে form1 সিলেক্ট করে add থেকে form ক্লিক করুন.এরপর open ক্লিক করুন


এরপর form2 ডান দিক থেকে select করে বাম পাশ থেকে image1 এ ক্লিক করে form2 তে সেট করুন ।এবার ফরম২ তে image1 select করে ডান দিকের প্র্পার্টিজ থেকের্টি stretch= true করে দিন ।যাতে image ইচ্ছা মত নিসাইজ করা যায়। এবার একই properties থেকে picture এ drop করে নিজের picture বসিয়ে দিন । এবার টেনে টেনে ছোত বড় করতে পারবেন।

image add করার পর দেখতে এমন হবে

ডান দিক থেকে form1 সিলেক্ট করে add থেকে form ক্লিক করুন। এরপর dialog এ ক্লিক করুন। open ক্লিক করুন।

এবার dialog ফর্মে বাম পাশ থেকে একটি drive list , একটি directory list add করুন

এবার কোড লিখার পালা । আসুন শুরু করা যাক ।
এবার ডান দিক থেকে আবার form1 এ ডাবল ক্লিক করুন ,আপনার সামনে form1 হাজির হবে। form1 এ ফাকা জায়গায় ডাবল ক্লিক করুন এবং লিখুন নিচের কোড ঃ

Image1.ToolTipText = “click here for details”
Form1.BackColor = QBColor(0)
File1.Pattern = “*.mp3;*.mpg;*.dat;*.wav;*.mpeg;*.avi”

এবার form1 এর command1 এ ক্লিক করুন এবং লিখুন ঃ
Dialog.Show

এবার form1 এর windows media player select করে ডান দিক থে properties থেকে name এ গিয়ে rename করুন wmp

এবার form1 এর filelistbox এ ক্লিক করুন এবং লিখুন ঃ
wmp.URL = File1.Path & “\” & File1.FileName

এবার ডান দিক থেকে dialog এ ক্লিক করুন এবং dialog ফর্মের drive1 ক্লিক করে লিখুন ঃ
On Error Resume Next
Dir1 = Drive1

dialog ফর্মের OK button এ ক্লিক করে লিখুন
Form1.File1.Path = Dir1

dialog ফর্মের cancel button এ ক্লিক করে লিখুন
Unload me

হয়ে গেল আপনার নিজের মিডিয়া প্লেয়ার। তবে কেউ কাজটি করতে না পারলে হলে আমাকে ইমেইল করে জানাবেন । আমি আপনাদের এই ফাইল টি দিয়ে দিব । যদি ভাল লাগে তবে মতামতে জানাবেন ।

আমার ওয়েবসাইট ভিজিট করার আমন্ত্রণ রইলো।

comments

6 কমেন্টস

  1. দারুন জিনিস শেখালেন অসংখ্য ধন্যবাদ শেয়ার করার জন্য………..

  2. ধন্যবাদ কিন্তু প্রজেক্টি সেফ ও রান করব কিভাবে কারন আমি VB তে একেবারেই নতুন। VB তে প্রজেক্টি লিখতে পারি কিন্তু সেফ ও রান রতে পারিনা ।বিস্তারিত বলবেন

  3. ধন্যবাদ আপনাকে। খুব উপকার করলেন তবে আরো ভাল হত যদি মাইক্রোসফট ভিজুয়াল বেসিক ডাউনলোড লিঙ্ক দিতেন।

  4. @মজিদ, বাজারে অহরহ ভিজুয়াল বেসিক এর সফটওয়ার, টিউটোরিয়ালের ডিভিডি পাওয়া যাচ্ছে। আপনি একটা ঢুঁ মেরে আসলেই পারতেন। আমার ব্যান্ডউইথ প্ল্যান এর সাথে এত বড় ফাইল ডাউনলোড মানানসই ছিলনা, তাই আমি কিনেই ফেলেছিলাম।

    আপনার জন্যে একটু গুগলাইলাম 😀

    http://www.mediafire.com/?jgqnrdyzmlq

    ডাউনলোড করে দেখেন। ফাইলের কোনপ্রকার ত্রুটি’র জন্যে ক্ষমা করবেন, কারণ এটা আমি ডাউনলোড করে দেখিনি! 🙂

  5. এগুলো ভালভাবে বুঝতে পারিন আমাক clear কোরে বুঝিয়ে দিন।

    এবার form1 এর command1 এ ক্লিক করুন এবং লিখুন ঃ
    Dialog.Show

    এবার form1 এর windows media player select করে ডান দিক থে properties থেকে name এ গিয়ে rename করুন wmp

    এবার form1 এর filelistbox এ ক্লিক করুন এবং লিখুন ঃ
    wmp.URL = File1.Path & “\” & File1.FileName

    এবার ডান দিক থেকে dialog এ ক্লিক করুন এবং dialog ফর্মের drive1 ক্লিক করে লিখুন ঃ
    On Error Resume Next
    Dir1 = Drive1

    dialog ফর্মের OK button এ ক্লিক করে লিখুন
    Form1.File1.Path = Dir1

    dialog ফর্মের cancel button এ ক্লিক করে লিখুন
    Unload me

LEAVE A REPLY

Please enter your comment!
Please enter your name here

Time limit is exhausted. Please reload the CAPTCHA.

This site uses Akismet to reduce spam. Learn how your comment data is processed.